Index: openacs-4/tcl/zz-postload.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/tcl/zz-postload.tcl,v
diff -u -r1.7.2.1 -r1.7.2.2
--- openacs-4/tcl/zz-postload.tcl	14 Feb 2019 10:02:36 -0000	1.7.2.1
+++ openacs-4/tcl/zz-postload.tcl	15 Sep 2021 16:20:46 -0000	1.7.2.2
@@ -34,7 +34,8 @@
 # the subdirectory and it would not be searched.
 
 proc __is_xql {arg} { 
-    return [expr {[file isdirectory $arg] || [file extension $arg] eq ".xql"}]}
+    return [expr {[file isdirectory $arg] || [file extension $arg] eq ".xql"}]
+}
 
 # We need to load query files for the top-level stuff in www and Tcl
 # dirs is the list of directories to walk for xql files.  Packages .xql