Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -N -r1.542.2.42 -r1.542.2.43
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 30 Sep 2019 09:54:19 -0000 1.542.2.42
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 30 Sep 2019 21:24:38 -0000 1.542.2.43
@@ -1332,12 +1332,12 @@
# Get the return_url from query parameters and check, if this is
# local.
#
- set return_url [:query_parameter "return_url" $default]
- if {[util::external_url_p $return_url]} {
- ns_log warning "return_url $return_url is apparently an external URL"
- ad_return_complaint 1 "Page '${:name}' non-local return_url was specified"
- ad_script_abort
- }
+ set return_url [:query_parameter return_url:localurl $default]
+ #if {[util::external_url_p $return_url]} {
+ # ns_log warning "return_url $return_url is apparently an external URL"
+ # ad_return_complaint 1 "Page '${:name}' non-local return_url was specified"
+ # ad_script_abort
+ #}
return $return_url
}