Index: openacs-4/packages/acs-templating/tcl/query-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/query-procs.tcl,v
diff -u -r1.39 -r1.40
--- openacs-4/packages/acs-templating/tcl/query-procs.tcl	22 Jan 2018 18:44:32 -0000	1.39
+++ openacs-4/packages/acs-templating/tcl/query-procs.tcl	24 Mar 2018 00:14:57 -0000	1.40
@@ -932,7 +932,7 @@
             # Make a copy of the row
             array set copy:$i [array get row]
 
-            # Contruct the list
+            # Construct the list
             set sortby {}
             foreach col $sort_cols {
                 append sortby $row($col) " "