Index: openacs-4/packages/cms/tcl/content-method-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/content-method-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/cms/tcl/content-method-procs.tcl	12 Jul 2001 06:37:26 -0000	1.2
+++ openacs-4/packages/cms/tcl/content-method-procs.tcl	17 Aug 2001 04:31:38 -0000	1.3
@@ -53,7 +53,7 @@
     } else {
 	# otherwise look up all content method mappings
 
-	template::query methods onelist "
+	template::query get_methods_1 methods onelist "
 	  select
 	    map.content_method
 	  from
@@ -69,7 +69,7 @@
     # if there are no mappings, return all methods
     if { [template::util::is_nil methods] } {
 
-	template::query methods onelist "
+	template::query get_methods_2 methods onelist "
 	  select
 	    content_method
 	  from
@@ -100,7 +100,7 @@
     
     set text_entry_filter [text_entry_filter_sql $content_type]
 
-    template::query default_method onerow "
+    template::query get_content_default_method default_method onerow "
       select
         label, map.content_method
       from
@@ -118,7 +118,7 @@
 	set methods [list [list $label $content_method]]
     } else {
 	# otherwise look up all content methods mappings
-	template::query methods multilist "
+	template::query get_methods_1 methods multilist "
 	  select
 	    label, map.content_method
 	  from
@@ -134,7 +134,7 @@
     # if there are no mappings, return all methods
     if { [template::util::is_nil methods] } {
 
-	template::query methods multilist "
+	template::query get_methods_2 methods multilist "
 	  select
 	    label, content_method
 	  from