Index: openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl,v
diff -u -N -r1.43 -r1.44
--- openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl	1 Mar 2005 00:01:22 -0000	1.43
+++ openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl	6 Mar 2005 18:51:06 -0000	1.44
@@ -641,7 +641,8 @@
             set ds_profile__iterations($tag) 0
         }
         stop {
-            if { ![empty_string_p $ds_profile__start_clock($tag)] } {
+            if { [info exists ds_profile__start_clock($tag)] 
+                 && ![empty_string_p $ds_profile__start_clock($tag)] } {
                 set num_ms [expr [clock clicks -milliseconds] - $ds_profile__start_clock($tag)]
                 unset ds_profile__start_clock($tag)