Index: openacs-4/contrib/obsolete-packages/bboard/www/message-mail.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/bboard/www/message-mail.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/obsolete-packages/bboard/www/message-mail.tcl	3 Sep 2002 13:40:41 -0000	1.2
+++ openacs-4/contrib/obsolete-packages/bboard/www/message-mail.tcl	6 Sep 2002 21:50:21 -0000	1.3
@@ -14,7 +14,7 @@
     forum_id:integer,notnull,bboard_forum_id
     message_id:integer,notnull,acs_message_id
 } -properties { 
-    context_bar:onevalue
+    context:onevalue
     forum_id:onevalue
     message:onerow
     message_id:onevalue
@@ -38,7 +38,7 @@
 
 set new_message_id [db_nextval acs_object_id_seq]
 
-set context_bar [ad_context_bar [list "forum?[export_url_vars forum_id]" $forum_name] "Mail message"]
+set context [list [list "forum?[export_url_vars forum_id]" $forum_name] "Mail message"]
 
 db_0or1row message_info {
     select reply_to, title, sent_date,