Index: openacs-4/packages/acs-lang/www/change-locale-include.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/change-locale-include.tcl,v
diff -u -r1.17.2.2 -r1.17.2.3
--- openacs-4/packages/acs-lang/www/change-locale-include.tcl	25 May 2016 09:22:59 -0000	1.17.2.2
+++ openacs-4/packages/acs-lang/www/change-locale-include.tcl	26 May 2016 16:16:24 -0000	1.17.2.3
@@ -59,11 +59,11 @@
     set package_id [element get_value locale package_id_info]
 
     if {[util::external_url_p $return_url]} {
-        ad_page_contract_handle_datasource_error "invalid url"
+        ad_complain 1 "invalid url"
         ad_script_abort
     }
-    if {![string is integer -strict $package_id]} 
-        ad_page_contract_handle_datasource_error "invalid package_id"
+    if {![string is integer -strict $package_id]} {
+        ad_complain 1 "invalid package_id"
         ad_script_abort
     }
 }