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 -N -r1.19 -r1.20 --- openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql 8 Aug 2006 21:26:17 -0000 1.19 +++ openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql 2 Sep 2008 20:48:09 -0000 1.20 @@ -193,4 +193,52 @@ + + + update acs_events set + [join $colspecs ", "] + where recurrence_id= :recurrence_id + and event_id in + (select e.event_id + from acs_events e, timespans t, time_intervals i + where e.recurrence_id = :recurrence_id + and t.timespan_id = e.timespan_id + and i.interval_id = t.interval_id + and (:edit_past_events_p = 't' + or i.start_date >= :start_date) + ) + + + + + + update cal_items + set [join $colspecs ", "] + where cal_item_id in (select e.event_id + from acs_events e, timespans t, time_intervals i + where e.recurrence_id = :recurrence_id + and t.timespan_id = e.timespan_id + and i.interval_id = t.interval_id + and (:edit_past_events_p = 't' + or i.start_date >= :start_date) + ) + + + + + + update acs_objects + set context_id = :calendar_id + where object_id in + (select e.event_id + from acs_events e, timespans t, time_intervals i + where e.recurrence_id = :recurrence_id + and t.timespan_id = e.timespan_id + and i.interval_id = t.interval_id + and (:edit_past_events_p = 't' + or i.start_date >= :start_date) + ) + + +