Index: openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl	1 Sep 2005 13:11:31 -0000	1.7
+++ openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl	2 Sep 2008 21:13:45 -0000	1.8
@@ -150,6 +150,7 @@
 }
 
 db_foreach dbqd.calendar.www.views.select_items {} {
+    if { [expr [clock scan $ansi_start_date] < [clock seconds]] } { continue }
     # Convert from system timezone to user timezone
     set ansi_start_date [lc_time_system_to_conn $ansi_start_date]
     set ansi_end_date [lc_time_system_to_conn $ansi_end_date]