Index: openacs-4/packages/lars-blogger/www/calendar.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/calendar.tcl,v diff -u -N -r1.4 -r1.5 --- openacs-4/packages/lars-blogger/www/calendar.tcl 28 Aug 2003 09:41:55 -0000 1.4 +++ openacs-4/packages/lars-blogger/www/calendar.tcl 29 Sep 2003 08:05:42 -0000 1.5 @@ -44,17 +44,3 @@ -calendar_details $calendar_details \ -day_number_template $day_number_template] -if {[empty_string_p $screen_name]} { - - set prev_month_url "${package_url}archive/[clock format [clock scan $prev_month] -format %Y/%m]/" - set next_month_url "${package_url}archive/[clock format [clock scan $next_month] -format %Y/%m]/" - -} else { - - set prev_month_url "${package_url}user/$screen_name/archive/[clock format [clock scan $prev_month] -format %Y/%m]/" - set next_month_url "${package_url}user/$screen_name/archive/[clock format [clock scan $next_month] -format %Y/%m]/" - -} -# Add year to the link -append next_month_name " [string range $next_month 0 3]" -append prev_month_name " [string range $prev_month 0 3]"