Index: openacs-4/packages/xotcl-core/www/show-class-graph.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/www/show-class-graph.tcl,v
diff -u -r1.8.6.4 -r1.8.6.5
--- openacs-4/packages/xotcl-core/www/show-class-graph.tcl	14 Feb 2014 18:23:18 -0000	1.8.6.4
+++ openacs-4/packages/xotcl-core/www/show-class-graph.tcl	1 Apr 2014 18:37:33 -0000	1.8.6.5
@@ -158,7 +158,7 @@
 if {$dot eq "" && [file executable /usr/bin/dot]} {set dot /usr/bin/dot}
 if {$dot eq ""} {ns_return 404 plain/text "dot not found"; ad_script_abort}
  
-set tmpnam [ns_tmpnam]
+set tmpnam [ad_tmpnam]
 set tmpfile $tmpnam.png
 set f [open $tmpnam.dot w]; puts $f $dot_code; close $f