Index: xotcl/apps/comm/webserver.xotcl
===================================================================
diff -u -r99a7a21854051cd691029b15ef8877aa9e86cf44 -rf9bb662bd07a30d00a33e75ab3354bb9f8463999
--- xotcl/apps/comm/webserver.xotcl	(.../webserver.xotcl)	(revision 99a7a21854051cd691029b15ef8877aa9e86cf44)
+++ xotcl/apps/comm/webserver.xotcl	(.../webserver.xotcl)	(revision f9bb662bd07a30d00a33e75ab3354bb9f8463999)
@@ -1,16 +1,15 @@
 #!../../src/xotclsh
-# $Id: webserver.xotcl,v 1.7 2007/08/06 11:35:56 neumann Exp $
+# $Id: webserver.xotcl,v 1.8 2007/08/14 16:36:46 neumann Exp $
 array set opts {-root ../../doc -port 8086 -protected-port 9096 -pkgdir .}
 array set opts $argv
 lappend auto_path $opts(-pkgdir)
 #if {$::tcl_platform(platform) eq "windows"} {lappend auto_path .}
 package require XOTcl; namespace import -force xotcl::*
 
 proc ! string {
-  set f [open [::xotcl::tmpdir]/log w+]; 
+  set f [open /tmp/log w+]; 
   puts $f "[clock format [clock seconds]] $string"
-  close $f
-}
+  close $f}
 
 @ @File {
   description {