Index: openacs-4/packages/calendar/www/cal-item-view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-item-view.adp,v diff -u -r1.34 -r1.35 --- openacs-4/packages/calendar/www/cal-item-view.adp 2 Sep 2008 21:02:04 -0000 1.34 +++ openacs-4/packages/calendar/www/cal-item-view.adp 6 Mar 2009 23:28:05 -0000 1.35 @@ -22,15 +22,28 @@ @cal_item.name@ -
+ +
#calendar.Description#:
-
@cal_item.description;noquote@
-
+
+ + +
+
+ #calendar.RelatedLink#: +
+ +
+
#calendar.Sharing#: Index: openacs-4/packages/calendar/www/cal-item-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-item-view.tcl,v diff -u -r1.23 -r1.24 --- openacs-4/packages/calendar/www/cal-item-view.tcl 6 Dec 2008 12:00:44 -0000 1.23 +++ openacs-4/packages/calendar/www/cal-item-view.tcl 6 Mar 2009 23:28:05 -0000 1.24 @@ -16,6 +16,14 @@ calendar::item::get -cal_item_id $cal_item_id -array cal_item +# Honor the related link redirection facility long implemented in acs-events, but +# ignored by calendar. +if { $cal_item(redirect_to_rel_link_p) eq "t" && + $cal_item(related_link_url) ne "" } { + ad_returnredirect $cal_item(related_link_url) + ad_script_abort +} + set write_p [permission::write_permission_p -object_id $cal_item_id -creation_user $cal_item(creation_user)] # Attachments?