Index: generic/aol-xotcl.tcl
===================================================================
diff -u -rda6586782390b02ed7660b56417c3db00d63d1c3 -r9f3e0047df7c39633eecf58318f70e13d60b6645
--- generic/aol-xotcl.tcl	(.../aol-xotcl.tcl)	(revision da6586782390b02ed7660b56417c3db00d63d1c3)
+++ generic/aol-xotcl.tcl	(.../aol-xotcl.tcl)	(revision 9f3e0047df7c39633eecf58318f70e13d60b6645)
@@ -57,7 +57,7 @@
 	$objects \n $import]
     # just for debugging purposes
     if {1} {
-      set f [open [::xotcl::tmpdir]/__aolserver-blueprint.tcl w]
+      set f [open [::xotcl::tmpdir]/__aolserver-blueprint-[ns_info server].tcl w]
       puts $f $script
       close $f
     }