Index: openacs-4/contrib/packages/project-manager/tcl/calendar-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/tcl/Attic/calendar-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/packages/project-manager/tcl/calendar-procs.tcl	21 Jul 2005 16:28:08 -0000	1.3
+++ openacs-4/contrib/packages/project-manager/tcl/calendar-procs.tcl	1 Aug 2005 19:27:18 -0000	1.4
@@ -58,12 +58,7 @@
 
 	set package_id [ad_conn package_id]
 	
-	if { ![string eq  $package_id [dotlrn::get_package_id]]} {
-	    set instance_clause "and (select context_id from acs_objects where object_id=(select context_id from acs_objects where object_id=(select context_id from acs_objects  where object_id=t.parent_id))) = :package_id"
-	} else {
-	    set instance_clause ""
-	}
-	#ad_return_complaint 1 "$package_id $instance_clause"
+
         if {[empty_string_p $date]} {
             set date [dt_systime]
         }