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 -r1.12 -r1.12.2.1
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	10 Nov 2003 10:20:47 -0000	1.12
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	19 Nov 2003 00:18:50 -0000	1.12.2.1
@@ -2222,6 +2222,15 @@
         <b>orderby_desc</b>: The reverse ordering from 'orderby_asc'.
       </li>
       <li>
+        <b>orderby_name</b>: The name of a named query, same functionality as orderby property.
+      </li>
+      <li>
+        <b>orderby_asc_name</b>: The name of a named query, same functionality as orderby_asc property.
+      </li>
+      <li>
+        <b>orderby_desc_name</b>: The name of a named query, same functionality as orderby_desc property.
+      </li>
+      <li>
         <b>default_direction</b>: The default order direction, 'asc' or 'desc'. Defaults to 'asc'.
       </li>
     </ul>
@@ -2361,6 +2370,22 @@
             set orderby_properties(orderby_asc) "$value asc"
             set orderby_properties(orderby_desc) "$value desc"
         }
+        orderby_asc_name {
+            set orderby_properties($property) $value
+            set value [uplevel $ulevel [list db_map $value]]
+            set orderby_properties(orderby_asc) $value
+        }
+        orderby_desc_name {
+            set orderby_properties($property) $value
+            set value [uplevel $ulevel [list db_map $value]]
+            set orderby_properties(orderby_desc) $value
+        }
+        orderby_name {
+            set orderby_properties($property) $value
+            set value [uplevel $ulevel [list db_map $value]]
+            set orderby_properties(orderby_asc) "$value asc"
+            set orderby_properties(orderby_desc) "$value desc"
+        }
         default {
             # We require all properties to be initialized to the empty string in the array, otherwise they're illegal.
             if { ![info exists orderby_properties($property)] } {