Index: openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl,v
diff -u -r1.70.2.23 -r1.70.2.24
--- openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl	20 Apr 2021 09:35:56 -0000	1.70.2.23
+++ openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl	21 Apr 2021 09:29:49 -0000	1.70.2.24
@@ -469,7 +469,7 @@
     set displayColumns [lmap column [[self]::__columns children] {
       if {[$column exists no_csv]} continue
       if {[$column istype ::xo::Table::BulkAction]} continue
-      if {[$column istype ::xo::Table::HiddenField]} continue          
+      if {[$column istype ::xo::Table::HiddenField]} continue
       set column
     }]
     foreach column $displayColumns {
@@ -837,14 +837,16 @@
       # Called interactively
       #
       set base [ad_conn url]
+      set query [ns_conn query]
     } else {
       #
       # Called in the background (e.g. from search renderer)
-      #      
+      #
       set base .
+      set query ""
     }
-    set href $base?[::xo::update_query [ns_conn query] $orderby_name $new_orderby]
-    
+    set href $base?[::xo::update_query $query $orderby_name $new_orderby]
+
     html::a -href $href -title $title {
       html::t [:_ label]
       html::img -src $img -alt ""