Index: openacs-4/packages/acs-automated-testing/www/admin/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/index.adp,v
diff -u -N -r1.21.2.18 -r1.21.2.19
--- openacs-4/packages/acs-automated-testing/www/admin/index.adp	2 May 2021 17:32:03 -0000	1.21.2.18
+++ openacs-4/packages/acs-automated-testing/www/admin/index.adp	2 May 2021 19:08:32 -0000	1.21.2.19
@@ -13,7 +13,7 @@
       <if @by_category@ eq "">
          <strong> all </strong>
       </if><else>
-         <a href="index?stress=@stress@&amp;security_risk=@security_risk@&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;quiet=@quiet@">all</a>
+         <a href="@all_url@">all</a>
       </else>
       <multiple name="main_categories">
         |
@@ -31,25 +31,25 @@
                 </div>
 
 <p><if @stress;literal@ true>
-      <a href="index?stress=0&amp;security_risk=@security_risk@&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;by_category=@by_category@&amp;quiet=0" class="checkbox-on">
+      <a href="@stress_url@" class="checkbox-on">
         <img src="/resources/acs-subsite/checkboxchecked.gif" class="checkbox-icon">
       </a>
     </if>
     <else>
-      <a href="index?stress=1&amp;security_risk=@security_risk@&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;by_category=@by_category@&amp;quiet=0" class="checkbox-off">
+      <a href="@stress_url@" class="checkbox-off">
         <img src="/resources/acs-subsite/checkbox.gif" alt="checkbox" class="checkbox-icon">
       </a>
     </else>
     Include Stress tests
 </p>
 
 <p><if @security_risk;literal@ true>
-      <a href="index?stress=@stress@&amp;security_risk=0&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;by_category=@by_category@&amp;quiet=0" class="checkbox-on">
+      <a href="@security_risk_url@" class="checkbox-on">
         <img src="/resources/acs-subsite/checkboxchecked.gif" class="checkbox-icon">
       </a>
     </if>
     <else>
-      <a href="index?stress=@stress@&amp;security_risk=1&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;by_category=@by_category@&amp;quiet=0" class="checkbox-off">
+      <a href="@security_risk_url@" class="checkbox-off">
         <img src="/resources/acs-subsite/checkbox.gif" alt="checkbox" class="checkbox-icon">
       </a>
     </else>
@@ -60,9 +60,9 @@
     <td class="main-table-modes"> [
       <if @quiet;literal@ true>
          <strong> quiet </strong> |
-         <a href="index?stress=@stress@&amp;security_risk=@security_risk@&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;by_category=@by_category@&amp;quiet=0">verbose</a>
+         <a href="@quiet_url@">verbose</a>
       </if><else>
-         <a href="index?stress=@stress@&amp;security_risk=@security_risk@&amp;by_package_key=@by_package_key@&amp;view_by=@view_by@&amp;by_category=@by_category@&amp;quiet=1">quiet</a>
+         <a href="@quiet_url@">quiet</a>
          | <strong> verbose </strong>
       </else>  ]
  <div class="form-help-text">
@@ -74,9 +74,9 @@
     <td class="main-table-modes"> [
       <if @view_by@ eq "" or @view_by@ eq "package">
          <strong> package </strong> |
-         <a href="index?stress=@stress@&amp;security_risk=@security_risk@&amp;by_package_key=@by_package_key@&amp;view_by=testcase&amp;by_category=@by_category@&amp;quiet=@quiet@">testcase</a>
+         <a href="@view_by_testcase_url@">testcase</a>
       </if><else>
-         <a href="index?stress=@stress@&amp;security_risk=@security_risk@&amp;view_by=package&amp;by_category=@by_category@&amp;quiet=@quiet@">package</a>
+         <a href="@view_by_package_url@">package</a>
          | <strong> testcase </strong>
       </else>  ]
     </td>
@@ -90,7 +90,7 @@
       </div>
       <div>
         <strong>&raquo;</strong>
-        <a href="clear?package_key=@by_package_key@&amp;category=@by_category@&amp;view_by=@view_by@&amp;quiet=@quiet@&amp;stress=@stress@&amp;security_risk=@security_risk@"> Clear test result data</a>
+        <a href="@clear_url@"> Clear test result data</a>
       </div>
       <if @by_package_key@ ne "" and @multiple_packages_p@ false>
         <div>
@@ -195,7 +195,7 @@
       </div>
       <div>
         <strong>&raquo;</strong>
-        <a href="clear?package_key=@by_package_key@&amp;category=@by_category@&amp;view_by=@view_by@&amp;quiet=@quiet@&amp;stress=@stress@&amp;security_risk=@security_risk@"> Clear test result data</a>
+        <a href="@clear_url@"> Clear test result data</a>
       </div>
       <if @by_package_key@ ne "" and @multiple_packages_p@ false>
         <div>
@@ -212,11 +212,11 @@
 <else>
    <blockquote>
      <div><strong>&raquo;</strong>
-       <a href="rerun?package_key=@by_package_key@&amp;category=@by_category@&amp;view_by=@view_by@&amp;quiet=@quiet@&amp;stress=@stress@&amp;security_risk=@security_risk@"> Rerun displayed test cases</a>
+       <a href="@rerun_url@"> Rerun displayed test cases</a>
      </div>
      <div>
        <strong>&raquo;</strong>
-       <a href="clear?package_key=@by_package_key@&amp;category=@by_category@&amp;view_by=@view_by@&amp;quiet=@quiet@&amp;stress=@stress@&amp;security_risk=@security_risk@"> Clear test result data</a>
+       <a href="@clear_url@"> Clear test result data</a>
      </div>
      <if @by_package_key@ ne "" and @multiple_packages_p@ false>
        <div>
@@ -282,11 +282,11 @@
     </table>
    <blockquote>
      <div><strong>&raquo;</strong>
-       <a href="rerun?package_key=@by_package_key@&amp;category=@by_category@&amp;view_by=@view_by@&amp;quiet=@quiet@&amp;stress=@stress@&amp;security_risk=@security_risk@"> Rerun displayed test cases</a>
+       <a href="@rerun_url@"> Rerun displayed test cases</a>
      </div>
      <div>
        <strong>&raquo;</strong>
-       <a href="clear?package_key=@by_package_key@&amp;category=@by_category@&amp;view_by=@view_by@&amp;quiet=@quiet@&amp;stress=@stress@&amp;security_risk=@security_risk@"> Clear test result data</a>
+       <a href="@clear_url@"> Clear test result data</a>
      </div>
      <if @by_package_key@ ne "" and @multiple_packages_p@ false>
        <div>
Index: openacs-4/packages/acs-automated-testing/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/admin/index.tcl,v
diff -u -N -r1.16.2.17 -r1.16.2.18
--- openacs-4/packages/acs-automated-testing/www/admin/index.tcl	2 May 2021 17:32:04 -0000	1.16.2.17
+++ openacs-4/packages/acs-automated-testing/www/admin/index.tcl	2 May 2021 19:08:32 -0000	1.16.2.18
@@ -123,6 +123,7 @@
     template::multirow create packageinfo key url \
         total passes fails warnings proc_coverage \
         proc_coverage_level background foreground
+
     foreach package_key [lsort [array names packages]] {
         lassign $packages($package_key) total passes fails warnings
         set proc_coverage [dict get [aa::coverage::proc_coverage -package_key $package_key] coverage]
@@ -210,6 +211,50 @@
 set record_url [export_vars -base "record-test" -url {return_url package_key}]
 set bulk_actions_vars [export_vars -form {{category $by_category} view_by quiet stress security_risk}]
 
+set flipped_stress [expr {!$stress}]
+set stress_url [export_vars -base index {
+    {quiet 0} {stress $flipped_stress} security_risk
+    by_package_key view_by by_category
+}]
+
+set flipped_security_risk [expr {!$security_risk}]
+set security_risk_url [export_vars -base index {
+    {quiet 0} stress {security_risk $flipped_security_risk}
+    by_package_key view_by by_category
+}]
+
+set flipped_quiet [expr {!$quiet}]
+set quiet_url [export_vars -base index {
+    {quiet $flipped_quiet} stress security_risk
+    by_package_key view_by by_category
+}]
+
+set view_by_testcase_url [export_vars -base index {
+    quiet stress security_risk
+    by_package_key {view_by testcase} by_category
+}]
+set view_by_package_url [export_vars -base index {
+    quiet stress security_risk
+    by_package_key {view_by package} by_category
+}]
+
+set all_url [export_vars -base index {
+    quiet stress security_risk
+    by_package_key view_by
+}]
+
+set rerun_url [export_vars -base rerun {
+    quiet stress security_risk
+    {package_key $by_package_key} view_by {category $by_category}
+}]
+
+set clear_url [export_vars -base clear {
+    quiet stress security_risk
+    {package_key $by_package_key} view_by {category $by_category}
+}]
+
+
+
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4