Index: openacs-4/packages/acs-templating/tcl/list-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/list-procs.tcl,v diff -u -N -r1.94 -r1.94.2.1 --- openacs-4/packages/acs-templating/tcl/list-procs.tcl 20 Dec 2018 13:02:06 -0000 1.94 +++ openacs-4/packages/acs-templating/tcl/list-procs.tcl 1 Mar 2019 10:38:05 -0000 1.94.2.1 @@ -303,7 +303,7 @@ # Set default for no_data set row_pretty_plural [lang::util::localize $row_pretty_plural] - set no_data [ad_decode $no_data "" [_ acs-templating.No_row_pretty_plural] $no_data] + set no_data [expr {$no_data eq "" ? "[_ acs-templating.No_row_pretty_plural]" : $no_data}] # Set ulevel to the level of the page, so we can access it later set list_properties(ulevel) "\#[expr {[info level] - $ulevel}]" @@ -1527,7 +1527,7 @@ if {$list_properties(orderby_selected_name) eq $element_name} { # We're currently ordering on this column - set direction [ad_decode $list_properties(orderby_selected_direction) "asc" "desc" "asc"] + set direction [expr {$list_properties(orderby_selected_direction) eq "asc" ? "desc" : "asc"}] set element_properties(orderby_url) [get_url \ -name $name \ -override [list [list $list_properties(orderby_name) "${element_name},$direction"]]]