furnace.chloe-tags: change indexing now that empty strings are not included

diff --git a/basis/furnace/chloe-tags/chloe-tags.factor b/basis/furnace/chloe-tags/chloe-tags.factor
index cd9bf815f1ff29ee7d7f4d7fda61675ad1949081..0fabe39783a18acc1f2c1c79ddcf10b30f33cc85 100644 (file)
--- a/basis/furnace/chloe-tags/chloe-tags.factor
+++ b/basis/furnace/chloe-tags/chloe-tags.factor
@@ -106,7 +106,7 @@ CHLOE: form
         [ hidden-fields ]
         [ compile-children>xml-string ] tri
         [
-            <unescaped> [XML <form><-><-></form> XML] second
+            <unescaped> [XML <form><-><-></form> XML] first
                 swap >>attrs
             write-xml
         ] [code]