Index: openacs-4/packages/calendar/www/cal-dayview.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-dayview.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/calendar/www/cal-dayview.tcl	23 Sep 2001 15:47:39 -0000	1.8
+++ openacs-4/packages/calendar/www/cal-dayview.tcl	9 Jan 2002 23:55:04 -0000	1.9
@@ -72,7 +72,12 @@
 
 	    # find out the calendar_id of the private calendar
 	    set calendar_id [calendar_have_private_p -return_id 1 $user_id]
-	    set calendar_name "Private"
+	    
+            set calendar_name [calendar_get_name $calendar_id]
+            
+            if {[empty_string_p $calendar_name]} {
+                set calendar_name "Private"
+            }
 
 	} else {
 	    set calendar_name [calendar_get_name $calendar_id]