Index: openacs-4/packages/calendar/www/view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view.tcl,v
diff -u -N -r1.29 -r1.30
--- openacs-4/packages/calendar/www/view.tcl	8 Jul 2009 01:00:07 -0000	1.29
+++ openacs-4/packages/calendar/www/view.tcl	10 Jul 2009 12:54:07 -0000	1.30
@@ -22,7 +22,6 @@
     }
 }
 
-ad_maybe_redirect_for_registration
 set package_id [ad_conn package_id]
 set user_id [ad_conn user_id]
 
@@ -54,8 +53,11 @@
     set ansi_day [string trimleft [lindex $ansi_list 2] "0"]
     set end_date [dt_julian_to_ansi [expr [dt_ansi_to_julian $ansi_year $ansi_month $ansi_day ] + $period_days]]
 }
-set calendar_personal_p [calendar::personal_p -calendar_id [lindex [lindex [calendar::calendar_list -package_id $package_id  ] 0] 1] ]
-
+if { $user_id eq 0 } {
+    set calendar_personal_p 0
+} else {
+    set calendar_personal_p [calendar::personal_p -calendar_id [lindex [lindex [calendar::calendar_list -package_id $package_id  ] 0] 1] ]
+}
 set notification_chunk [notification::display::request_widget \
                             -type calendar_notif \
                             -object_id $package_id \