xml.syntax: parse <-variable->s with parse-word instead of search so the no-word...

diff --git a/basis/xml/syntax/syntax.factor b/basis/xml/syntax/syntax.factor
index 92f3cd7a897733e5434ffb0e113991ac66f0cfe3..6455d7ba0bd79dad758ab68b5b75fe5ce92a60d9 100644 (file)
--- a/basis/xml/syntax/syntax.factor
+++ b/basis/xml/syntax/syntax.factor
@@ -145,7 +145,7 @@ MACRO: interpolate-xml ( xml -- quot )
     ] each-interpolated drop ;
 
 : >search-hash ( seq -- hash )
-    [ dup search ] H{ } map>assoc ;
+    [ dup parse-word ] H{ } map>assoc ;
 
 : extract-variables ( xml -- seq )
     [ [ var>> , ] each-interpolated ] { } make ;