Index: openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl	10 Jan 2007 21:21:59 -0000	1.7
+++ openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl	8 Dec 2012 18:20:35 -0000	1.8
@@ -65,7 +65,7 @@
 
 } -validate {
     {proc
-    { ![empty_string_p [info procs ::${proc}]] }
+    { [info commands ::${proc} ne ""] }
     {The specified procedure name does not exist. Is the -procs.tcl file loaded?}
     }
     {proc