Index: openacs-4/packages/xowiki/tcl/folder-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/folder-procs.tcl,v diff -u -r1.55.2.16 -r1.55.2.17 --- openacs-4/packages/xowiki/tcl/folder-procs.tcl 29 Jul 2019 17:13:25 -0000 1.55.2.16 +++ openacs-4/packages/xowiki/tcl/folder-procs.tcl 22 Aug 2019 12:53:30 -0000 1.55.2.17 @@ -570,7 +570,7 @@ set csrf [expr {[info exists ::__csrf_token] ? [list __csrf_token $::__csrf_token] : ""}] set ::__xowiki_folder_link [::$package_id make_link \ -link $current_folder_pretty_link \ - $current_folder bulk-delete $csrf] + $current_folder bulk-delete $csrf return_url] switch [::$package_id get_parameter PreferredCSSToolkit bootstrap] { bootstrap {set tableWidgetClass ::xowiki::BootstrapTable} default {set tableWidgetClass ::xowiki::YUIDataTable} Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v diff -u -r1.368.2.31 -r1.368.2.32 --- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 9 Aug 2019 08:29:28 -0000 1.368.2.31 +++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 22 Aug 2019 12:53:30 -0000 1.368.2.32 @@ -58,7 +58,9 @@ :log "bulk-delete: DELETE $page_name in folder ${:name}-> $item_id" ${:package_id} www-delete -item_id $item_id } - ${:package_id} returnredirect [:pretty_link] + set return_url [expr {[:exists_parameter return_url] ? + [:get_parameter return_url] : [:pretty_link]}] + ${:package_id} returnredirect $return_url } #