Index: openacs-4/packages/new-portal/www/render_styles/all_in_one/render-element.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/render_styles/all_in_one/render-element.tcl,v diff -u -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/new-portal/www/render_styles/all_in_one/render-element.tcl 23 May 2003 11:44:18 -0000 1.5.2.1 +++ openacs-4/packages/new-portal/www/render_styles/all_in_one/render-element.tcl 5 Jun 2003 17:11:11 -0000 1.5.2.2 @@ -31,8 +31,9 @@ # If the error is in the element's "show" proc, the error will # be shown in the content of the portlet. This is for errors other # than with the "show" proc. - ns_log error "\n\n *** Error in portal/www/render_sytles/all_in_one/render-element.tcl \n Uncaught exception when calling portal::evaluate_element \n with element_id $element_id\n\n" - ad_return -code error $errmsg + global errorInfo + ns_log error "\n\n *** Error in portal/www/render_sytles/all_in_one/render-element.tcl \n Uncaught exception when calling portal::evaluate_element \n with element_id $element_id\n$errorInfo\n\n" + ad_return -code error -errorinfo $errorInfo $errmsg } else { # all is ok array set element $element_data Index: openacs-4/packages/new-portal/www/render_styles/individual/render-element.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/render_styles/individual/render-element.tcl,v diff -u -r1.8 -r1.8.2.1 --- openacs-4/packages/new-portal/www/render_styles/individual/render-element.tcl 9 Aug 2002 20:56:31 -0000 1.8 +++ openacs-4/packages/new-portal/www/render_styles/individual/render-element.tcl 5 Jun 2003 17:11:11 -0000 1.8.2.1 @@ -34,7 +34,10 @@ # If the error is in the element's "show" proc, the error will # be shown in the content of the portlet. This is for errors other # than with the "show" proc. It hides the entire PE - ns_log error "\n\n *** Error in portal/www/render_sytles_/indiviudal/render-element.tcl \n Uncaught exception when calling portal::evaluate_element \n with element_id $element_id\n\n" + + global errorInfo + + ns_log error "\n\n *** Error in portal/www/render_styles/indiviudal/render-element.tcl \n Uncaught exception when calling portal::evaluate_element \n with element_id $element_id\n$errmsg\n$errorInfo\n" array set element {content {}} } else {