Index: openacs-4/packages/lab-report/www/view-lab.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lab-report/www/view-lab.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/lab-report/www/view-lab.tcl	12 May 2006 01:34:34 -0000	1.2
+++ openacs-4/packages/lab-report/www/view-lab.tcl	24 Aug 2006 10:56:29 -0000	1.3
@@ -20,7 +20,7 @@
 
 db_1row lab_details {}
 
-db_multirow -extend {view_url new_url report_created_p} report select_reports {} {
+db_multirow -extend {view_url new_url report_created_p viewable_p} report select_reports {} {
     set view_url [export_vars -url -base view-report \
 		      {lab_id template_id report_id}]
     set new_url [export_vars -url -base new-report {lab_id template_id}]
@@ -29,6 +29,13 @@
     if {$report_id == ""} {
 	set report_created_p 0
     }
+
+    # Is the report viewable?  Any date after the start date means the
+    # student can view their report.
+    set viewable_p 0
+    if { $now > $start_date } {
+	set viewable_p 1
+    }
 }
 
 set title "$lab_name"