From fa5b1edca2aaaefe11017070fdb1e2e4b4001644 Mon Sep 17 00:00:00 2001
From: Daniel Ehrenberg <littledan@Macintosh-24.local>
Date: Tue, 4 Dec 2007 16:33:46 -0500
Subject: [PATCH] XML generator changes

---
 extra/xml/generator/generator.factor | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/extra/xml/generator/generator.factor b/extra/xml/generator/generator.factor
index 1d1a6c09d3..84edc4e551 100644
--- a/extra/xml/generator/generator.factor
+++ b/extra/xml/generator/generator.factor
@@ -25,10 +25,7 @@ IN: xml.generator
 : make-xml ( name quot -- xml )
     f swap make-xml* ; inline
 
-SYMBOL: namespace-table
-: with-namespaces ( table quot -- )
-    >r H{ } assoc-like namespace-table r> with-variable ; inline
-
+! Word-based XML literal syntax
 : parsed-name ( accum -- accum )
     scan ":" split1 [ f <name> ] [ <name-tag> ] if* parsed ;