[Gd-chatter] r10799 - trunk/libraries/xml-parser

[hannes at gwydiondylan.org]

Author: hannes
Date: Sat Jun 17 01:49:40 2006
New Revision: 10799

Modified:
   trunk/libraries/xml-parser/simple-xml.dylan
Log:
Job: minor
escape-xml is really only defined on <string>, so make it a function


Modified: trunk/libraries/xml-parser/simple-xml.dylan
==============================================================================
--- trunk/libraries/xml-parser/simple-xml.dylan	(original)
+++ trunk/libraries/xml-parser/simple-xml.dylan	Sat Jun 17 01:49:40 2006
@@ -85,7 +85,7 @@
 </html>
 */
 
-define method escape-xml (string :: <string>) => (res :: <string>)
+define function escape-xml (string :: <string>) => (res :: <string>)
   let res = "";
   for (char in string)
     if (char = '>')