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.94.2.18 -r1.94.2.19
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	16 Jan 2022 15:34:56 -0000	1.94.2.18
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	18 Apr 2022 08:43:02 -0000	1.94.2.19
@@ -1185,16 +1185,15 @@
 
     set file_stub [template::resource_path -type lists -style $style]
 
-    # ensure that the style template has been compiled and is up-to-date
-    template::adp_init adp $file_stub
+    #
+    # Ensure that the ADP template has been compiled and is
+    # up-to-date, and execute it to update __adp_output. The only data
+    # source on which this template depends is the "elements" multirow
+    # data source.  The output of this procedure will be placed in
+    # __adp_output in this stack frame.
+    #
+    [template::adp_init adp $file_stub]
 
-    # get result of template output procedure into __adp_output
-    # the only data source on which this template depends is the "elements"
-    # multirow data source.  The output of this procedure will be
-    # placed in __adp_output in this stack frame.
-
-    template::code::adp::$file_stub
-
     return $__adp_output
 }
 
@@ -1871,16 +1870,15 @@
 
     set file_stub [template::resource_path -type lists -style $style]
 
-    # ensure that the style template has been compiled and is up-to-date
-    template::adp_init adp $file_stub
+    #
+    # Ensure that the ADP template has been compiled and is
+    # up-to-date, and execute it to update __adp_output. The only data
+    # source on which this template depends is the "elements" multirow
+    # data source.  The output of this procedure will be placed in
+    # __adp_output in this stack frame.
+    #
+    [template::adp_init adp $file_stub]
 
-    # get result of template output procedure into __adp_output
-    # the only data source on which this template depends is the "elements"
-    # multirow data source.  The output of this procedure will be
-    # placed in __adp_output in this stack frame.
-
-    template::code::adp::$file_stub
-
     return $__adp_output
 }
 
@@ -3193,16 +3191,15 @@
     }
     set file_stub [template::resource_path -type lists -style $style]
 
-    # ensure that the style template has been compiled and is up-to-date
-    template::adp_init adp $file_stub
-
-    # get result of template output procedure into __adp_output
-    # the only data source on which this template depends is the "elements"
-    # multirow data source.  The output of this procedure will be
-    # placed in __adp_output in this stack frame.
-
-    template::code::adp::$file_stub
-
+    #
+    # Ensure that the ADP template has been compiled and is
+    # up-to-date, and execute it to update __adp_output. The only data
+    # source on which this template depends is the "elements" multirow
+    # data source.  The output of this procedure will be placed in
+    # __adp_output in this stack frame.
+    #
+    [template::adp_init adp $file_stub]
+    
     return $__adp_output
 }