Index: openacs-4/packages/calendar/www/cal-options.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-options.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/calendar/www/cal-options.tcl	11 Aug 2003 12:14:16 -0000	1.9
+++ openacs-4/packages/calendar/www/cal-options.tcl	12 Aug 2003 23:42:38 -0000	1.10
@@ -13,6 +13,13 @@
 
 set user_id [ad_conn user_id]
 
+# If we're included from another package url_stub will have been set up
+# to give a valid url prefix that points to the proper calendar.
+
+if { ![info exists base_url] } {
+    set base_url ""
+}
+
 multirow create calendars calendar_name calendar_id calendar_admin_p
 foreach calendar $calendar_list {
     multirow append calendars [lindex $calendar 0] [lindex $calendar 1] [lindex $calendar 2]