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 -N -r1.36 -r1.37
--- openacs-4/packages/acs-templating/tcl/query-procs.tcl	1 Oct 2017 12:16:05 -0000	1.36
+++ openacs-4/packages/acs-templating/tcl/query-procs.tcl	22 Jan 2018 09:42:31 -0000	1.37
@@ -531,43 +531,6 @@
   }
 }
 
-ad_proc -public -deprecated template::query::iterate { statement_name sql body } {
-    @param statement_name Standard db_api statement name used to hook 
-                          into query dispatcher
-
-    @param sql Query to use when processing this command
-
-    @param body Code body to be execute for each result row of the 
-                returned query
-
-    @see db_foreach
-} {
-
-    db_with_handle db {
-        set result [db_exec select $db $statement_name $sql 2]
-
-        set rowcount 0
-
-        while { [ns_db getrow $db $result] } {
-
-            upvar __query_iterate_row row
-
-            set row(rownum) [incr rowcount]
-
-            set size [ns_set size $result]
-
-            for { set i 0 } { $i < $size } { incr i } {
-
-                set column [ns_set key $result $i]
-                set row($column) [ns_set value $result $i]
-            }
-
-            # Execute custom code for each row
-            uplevel "upvar 0 __query_iterate_row row; $body"
-        }
-    }
-}
-
 ad_proc -private template::query::flush_cache { cache_match } {
 
     Flush the cached queries where the query name matches the