Index: openacs-4/packages/acs-tcl/tcl/defs-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/defs-procs-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-tcl/tcl/defs-procs-oracle.xql	24 Apr 2001 06:02:27 -0000	1.1
+++ openacs-4/packages/acs-tcl/tcl/defs-procs-oracle.xql	15 May 2002 18:47:31 -0000	1.2
@@ -1,32 +1,16 @@
 <?xml version="1.0"?>
 
 <queryset>
-   <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
+    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<fullquery name="ad_record_query_string.query_string_record">      
-      <querytext>
-      
-	insert into query_strings 
-	(query_date, query_string, subsection, n_results, user_id) values
-	(sysdate, :query_string, :subsection, :n_results, :user_id)
-    
-      </querytext>
-</fullquery>
+    <fullquery name="ad_record_query_string.query_string_record">      
+        <querytext>
+            insert
+            into query_strings 
+            (query_date, query_string, subsection, n_results, user_id)
+            values
+            (sysdate, :query_string, :subsection, :n_results, :user_id)
+        </querytext>
+    </fullquery>
 
- 
-<fullquery name="ad_parameter.ad_parameter_set">      
-      <querytext>
-      
-		begin
-		  apm.set_value(
-			  package_id => :package_id,
-			  parameter_name => :name,
-			  attr_value => :set
-			);
-		end;
-	    
-      </querytext>
-</fullquery>
-
- 
 </queryset>