Forum OpenACS Q&A: Re: Problem with ad_script_abort on include

Posted by Gustaf Neumann on
With the head version, everything looks ok, ... but there have been several changes in the error management in the last months. See below for a couple of script aborts with error calls from other includes...

maybe a version issue? what version of assessment are you using with OpenACS5.9.1? Do you get the same error when your create a simple .adp page in openacs-4/www including the ad_script_abort command?

% fgrep -B3 ad_script_abort packages/acs*/lib/*tcl

acs-admin/lib/password-update.tcl-if { ![auth::password::can_change_p -user_id $user_id] } {
acs-admin/lib/password-update.tcl-    ad_return_error "Not supported" "Changing password is not supported."
acs-admin/lib/password-update.tcl:    ad_script_abort
acs-admin/lib/service-parameters.tcl-    ad_return_forbidden \
acs-admin/lib/service-parameters.tcl-        "Permission Denied" \
acs-admin/lib/service-parameters.tcl-        "<blockquote>You don't have permission to view this page.</blockquote>"
acs-admin/lib/service-parameters.tcl:    ad_script_abort
acs-subsite/lib/login.tcl-         || $time < [ns_time] - $expiration_time
acs-subsite/lib/login.tcl-     } {
acs-subsite/lib/login.tcl-        ad_returnredirect -message [_ acs-subsite.Login_has_expired] -- [export_vars -base [ad_conn url] { return_url }]
acs-subsite/lib/login.tcl:        ad_script_abort
acs-subsite/lib/user-new.tcl-            if {[parameter::get -parameter RegistrationRequiresApprovalP -default 0] &&
acs-subsite/lib/user-new.tcl-                $creation_info(account_status) eq "closed"} {
acs-subsite/lib/user-new.tcl-                    ad_return_warning "Account approval is required" $creation_info(account_message)
acs-subsite/lib/user-new.tcl:                    ad_script_abort