Index: openacs-4/packages/calendar/tcl/cal-item-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/cal-item-procs-oracle.xql,v
diff -u -r1.5 -r1.5.2.1
--- openacs-4/packages/calendar/tcl/cal-item-procs-oracle.xql	23 Aug 2002 19:07:35 -0000	1.5
+++ openacs-4/packages/calendar/tcl/cal-item-procs-oracle.xql	2 Oct 2002 11:28:45 -0000	1.5.2.1
@@ -3,51 +3,6 @@
 <queryset>
    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<fullquery name="cal_assign_item_permission.grant_calendar_permissions_to_items_1">      
-      <querytext>
-      
-		begin
-		acs_permission.grant_permission (
-		  object_id       =>      :cal_item_id,
-		  grantee_id      =>      :party_id,
-		  privilege       =>      'cal_item_read'
-		);
-		end;
-	    
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="cal_assign_item_permission.grant_calendar_permissions_to_items_2">      
-      <querytext>
-      
-	    begin
-	    acs_permission.grant_permission (
-	      object_id       =>      :cal_item_id,
-	      grantee_id      =>      :party_id,
-	      privilege       =>      :permission
-	    );
-	    end;
-	
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="cal_assign_item_permission.grant_calendar_permissions_to_items_3">      
-      <querytext>
-      
-	    begin
-	    acs_permission.revoke_permission (
-	      object_id       =>      :cal_item_id,
-	      grantee_id      =>      :party_id,
-	      privilege       =>      :permission
-	    );
-	    end;
-	
-      </querytext>
-</fullquery>
-
- 
 <fullquery name="cal_item_create.insert_activity">      
       <querytext>
       
@@ -97,21 +52,6 @@
 </fullquery>
 
  
-<fullquery name="cal_item_create.grant_calendar_permissions_to_items_4">      
-      <querytext>
-      
-	    begin
-  	      acs_permission.grant_permission (
-                object_id       =>      :cal_item_id,
-                grantee_id      =>      :grantee_id,
-                privilege       =>      :privilege
-              );
-	    end;
-	
-      </querytext>
-</fullquery>
-
- 
 <fullquery name="cal_item_update.update_interval">      
       <querytext>