diff --git a/contrib/httpd/xml.factor b/contrib/httpd/xml.factor
index 06f6e352c6..834151e0da 100644
--- a/contrib/httpd/xml.factor
+++ b/contrib/httpd/xml.factor
@@ -396,7 +396,7 @@ M: comment (xml>string)
         initialize-xml-stack
         call
         xml-stack get
-        first cdr second
+        first cdr first
     ] with-scope ; inline
 
 ! * System for words specialized on tag names