Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -N -r1.332.2.4 -r1.332.2.5 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 1 Apr 2019 15:21:26 -0000 1.332.2.4 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 1 Apr 2019 16:00:44 -0000 1.332.2.5 @@ -1002,7 +1002,8 @@ set index_link [:make_link -privilege public -link "" ${:id} {} {}] set link [:query_parameter "return_url" ""] if {$link ne ""} {set back_link $link} - if {[util::external_url $link]} { + if {[util::external_url_p $link]} { + ns_log warning "return_url is apparently an external URL: $link" set link "" unset back_link }