Index: openacs-4/contrib/packages/events/www/admin/event-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/events/www/admin/Attic/event-add.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/events/www/admin/event-add.tcl	9 Mar 2003 12:08:22 -0000	1.1
+++ openacs-4/contrib/packages/events/www/admin/event-add.tcl	9 Mar 2003 16:27:55 -0000	1.2
@@ -36,7 +36,7 @@
     -options $venues
 
 events::activity::get -activity_id $activity_id -array activity_info
-set context_bar [ad_context_bar [list "activities" Activities] [list "activity?activity_id=$activity_id" Activity] "Add Event"]
+set context [list [list "activities" Activities] [list "activity?[export_vars { activity_id }]" $activity_info(name)] "Add Event"]
 set activity_name $activity_info(name)
 set title "Add a New Event for $activity_name"
 set return_url "event-add-2?activity_id=$activity_id"