Index: openacs-4/packages/acs-tcl/tcl/callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/callback-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-tcl/tcl/callback-procs.tcl 7 Aug 2017 23:47:59 -0000 1.3 +++ openacs-4/packages/acs-tcl/tcl/callback-procs.tcl 3 Sep 2024 15:37:34 -0000 1.4 @@ -12,7 +12,7 @@ } { Returns whether the specified implementation exists. } { - return [expr {[info commands ::callback::${callback}::impl::${impl}] ne ""}] + return [expr {[namespace which ::callback::${callback}::impl::${impl}] ne ""}] } ad_proc -public callback::get_object_type_impl {