Index: openacs-4/packages/ams/tcl/ams-widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ams/tcl/ams-widget-procs.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/ams/tcl/ams-widget-procs.tcl 8 Jun 2005 06:13:28 -0000 1.3 +++ openacs-4/packages/ams/tcl/ams-widget-procs.tcl 9 Jun 2005 20:20:39 -0000 1.4 @@ -75,8 +75,8 @@ set options {} } } + ns_log notice "MGEDDERT DEBUG: return ::ams::widget::${widget} -request $request -attribute_name $attribute_name -pretty_name $pretty_name -value $value -optional_p $optional_p -form_name $form_name -options $options" return [::ams::widget::${widget} -request $request -attribute_name $attribute_name -pretty_name $pretty_name -value $value -optional_p $optional_p -form_name $form_name -options $options] - } else { # the widget requested did not exist ns_log notice "AMS: the ams widget \"${widget}\" was requested and the associated ::ams::widget::${widget} procedure does not exist"