Index: openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql	24 Aug 2001 01:19:03 -0000	1.1
+++ openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql	8 Sep 2001 00:36:49 -0000	1.2
@@ -5,19 +5,6 @@
 
 <fullquery name="cal_assign_item_permission.grant_calendar_permissions_to_items_1">      
       <querytext>
-
-    <!--FIX ME PLSQL
-	FIX ME PLSQL
-
-		begin
-		  acs_permission.grant_permission (
-			object_id       =>      :cal_item_id,
-			grantee_id      =>      :party_id,
-			privilege       =>      'cal_item_read'
-		  );
-		end;
-	-->   
-
 	select acs_permission__grant_permission (
 					:cal_item_id,
 					:party_id,
@@ -30,19 +17,6 @@
 
 <fullquery name="cal_assign_item_permission.grant_calendar_permissions_to_items_2">      
       <querytext>
-
-   <!--  FIX ME PLSQL
-	FIX ME PLSQL
-
-		begin
-		  acs_permission__grant_permission (
-			object_id       =>      :cal_item_id,
-			grantee_id      =>      :party_id,
-			privilege       =>      :permission
-		  );
-		end;
--->
-	
 	select acs_permission__grant_permission (
 					:cal_item_id,
 					:party_id,
@@ -55,19 +29,6 @@
  
 <fullquery name="cal_assign_item_permission.grant_calendar_permissions_to_items_3"> 
       <querytext>
-
-     <! --FIX ME PLSQL
-	FIX ME PLSQL
-
-	    begin
-	      acs_permission.revoke_permission (
-			object_id       =>      :cal_item_id,
-			grantee_id      =>      :party_id,
-			privilege       =>      :permission
-	    );
-	    end;
--->
-
 	select acs_permission__revokke_permission (
 					:cal_item_id,
 					:party_id,
@@ -80,19 +41,6 @@
  
 <fullquery name="cal_item_create.insert_activity">      
       <querytext>
-
-<!--      FIX ME PLSQL
-	FIX ME PLSQL
-	begin
-	  :1 := acs_activity.new (
-		name          => :name,
-		description   => :description,
-		creation_user => :creation_user,
-		creation_ip   => :creation_ip
-	  );
-	end;
--->
-
 	select acs_activity__new (
 					null,
 					:name,
@@ -111,23 +59,7 @@
 
 <fullquery name="cal_item_create.insert_timespan">      
       <querytext>
-
-<!--      FIX ME PLSQL
-	FIX ME PLSQL
-
-	begin
-	  :1 := timespan.new (  
-		start_date => to_date(:start_date,:date_format),
-		end_date   => to_date(:end_date,:date_format)
-	  );
-	end;
--->
-  
 	select timespan__new (    
-
-				<!--NOT PROPERLY DONE
-		THESE ARE THE ONLY ARGS NEEDED DUNNO THE FORMAT THOU-->
-
 					:to_date(:start_date,:date_format),
 					:to_date(:end_date,:date_format)
 	) 
@@ -138,21 +70,6 @@
  
 <fullquery name="cal_item_create.cal_item_add">      
       <querytext>
-
-<!--      FIX ME PLSQL
-	FIX ME PLSQL
-
-	begin
-	  :1 := cal_item__new(
-  		on_which_calendar  => :on_which_calendar,
-		activity_id        => :activity_id,
-		timespan_id        => :timespan_id,
-		creation_user      => :creation_user,
-		creation_ip        => :creation_ip
-	  );
-	end;
--->
-    
 	select cal_item__new (
 					null,
 					:on_which_calendar,
@@ -174,18 +91,6 @@
  
 <fullquery name="cal_item_create.grant_calendar_permissions_to_items_4">      
       <querytext>
-
-<!--      FIX ME PLSQL
-	FIX ME PLSQL
-	    begin
-  	      acs_permission.grant_permission (
-                object_id       =>      :cal_item_id,
-                grantee_id      =>      :grantee_id,
-                privilege       =>      :privilege
-              );
-	    end;
--->
-
 	select acs_permission__grant_permission (
 					:cal_item_id,
 					:grantee_id,
@@ -198,18 +103,6 @@
  
 <fullquery name="cal_item_update.update_interval">      
       <querytext>
-
-<!--      FIX ME PLSQL
-	FIX ME PLSQL
-	begin
-	  time_interval.edit (
-	    interval_id  => :interval_id,
-	    start_date   => to_date(:start_date,:date_format),
-	    end_date     => to_date(:end_date,:date_format)
-	  );
-	end;
--->
-    
 	select time_interval__edit (
 					:interval_id,
 					to_date(:start_date,:date_format),
@@ -222,19 +115,6 @@
  
 <fullquery name="cal_item_delete.delete_cal_item">      
       <querytext>
-
-<!--      FIX ME PLSQL
-	FIX ME PLSQL
-
-	begin
-	  cal_item.delete (
-	    cal_item_id  => :cal_item_id
-	  );
-	end;
--->
- 
-<!-- THIS IS DONE AND CHECK CORRECTLY  -->
-
 	select cal_item__delete (
 					:cal_item_id
 	)