Index: openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl,v
diff -u -r1.13.2.3 -r1.13.2.4
--- openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl	9 Jun 2016 08:19:39 -0000	1.13.2.3
+++ openacs-4/packages/acs-automated-testing/www/admin/testcase.tcl	2 Dec 2016 16:16:53 -0000	1.13.2.4
@@ -5,6 +5,7 @@
     package_key:token
     {showsource:boolean 0}
     {quiet:boolean 1}
+    {return_url ""}
 } -properties {
     title:onevalue
     context_bar:onevalue
@@ -106,7 +107,9 @@
     {absolute_file_path $testcase_file}
 }]
 
-set return_url [export_vars -base . { { view_by testcase } quiet { by_package_key $package_key } }]
+if {$return_url eq ""} {
+  set return_url [export_vars -base . { { view_by testcase } quiet { by_package_key $package_key } }]
+}
 
 set quiet_url "[export_vars -base testcase -entire_form -exclude {quiet}]&quiet=1"
 set verbose_url "[export_vars -base testcase -entire_form -exclude {quiet}]&quiet=0"