Index: openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl	26 Oct 2001 17:21:05 -0000	1.3
+++ openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl	26 Oct 2001 17:26:12 -0000	1.4
@@ -104,14 +104,14 @@
 	where   on_which_calendar = :calendar_id
 	)" {
 	    ns_set put $set_id $start_hour \
-		    "<a href=?date=$date&action=edit&cal_item_id=$item_id>
+		    "<a href=calendar/?date=$date&action=edit&cal_item_id=$item_id>
 	    $pretty_start_date - $pretty_end_date $name ($calendar_name)
 	    </a><br>"
 	}  
 
 	
 	set row_html "
-	<table cellpadding=2 cellspacing=0 border=1 width=500>
+	<table cellpadding=2 cellspacing=0 border=1 width=200>
 	<tr><td width=90><b>Time</b></td><td><b>Title</b></td></tr>"
 	
 	while {$i < $num_hour_rows} {
@@ -144,7 +144,7 @@
 	    append row_html "
 	    <tr>
 	    <td valign=top nowrap $bgcolor_html width=10%>
-	    <a href=?date=$date&view=$view&action=add&start_time=$i:00&end_time=[expr $i+1]:00> $time </a>
+	    <a href=calendar/?date=$date&view=$view&action=add&start_time=$i:00&end_time=[expr $i+1]:00> $time </a>
 	    </td>
 	    
 	    <td valign=top nowrap border=1>"