Index: library/xotcl/apps/comm/webserver.xotcl
===================================================================
diff -u -N -rf3b7952aabc9e4f9079febd1f5b7f5fb833fd50c -r76fadfb3f603f8f96a6064f4bb5342133923ec53
--- library/xotcl/apps/comm/webserver.xotcl	(.../webserver.xotcl)	(revision f3b7952aabc9e4f9079febd1f5b7f5fb833fd50c)
+++ library/xotcl/apps/comm/webserver.xotcl	(.../webserver.xotcl)	(revision 76fadfb3f603f8f96a6064f4bb5342133923ec53)
@@ -85,9 +85,9 @@
   }
   set c [subst $content]
   my replyCode 200
-  my connection puts "Content-Type: text/html"
-  my connection puts "Content-Length: [string length $c]\n"
-  my connection puts-nonewline $c
+  [self]::connection puts "Content-Type: text/html"
+  [self]::connection puts "Content-Length: [string length $c]\n"
+  [self]::connection puts-nonewline $c
   my close
 }