Resolved merge.

[factor.git] / extra / html / parser / parser.factor

diff --git a/extra/html/parser/parser.factor b/extra/html/parser/parser.factor
index 948bd0c954907eab4317306f411a635ca6ac5214..9fcbffd0db31daa220a9e18a125bb3c324cb70be 100644 (file)
--- a/extra/html/parser/parser.factor
+++ b/extra/html/parser/parser.factor
@@ -21,7 +21,7 @@ SYMBOL: tagstack
 
 : closing-tag? ( string -- ? )
     [ f ]
-    [ { [ first CHAR: / = ] [ peek CHAR: / = ] } 1|| ] if-empty ;
+    [ { [ first CHAR: / = ] [ last CHAR: / = ] } 1|| ] if-empty ;
 
 : <tag> ( name attributes closing? -- tag )
     tag new