Index: openacs-4/contrib/obsolete-packages/bboard/www/message-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/bboard/www/message-new.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/obsolete-packages/bboard/www/message-new.tcl	20 Apr 2001 20:51:09 -0000	1.1
+++ openacs-4/contrib/obsolete-packages/bboard/www/message-new.tcl	3 Sep 2002 13:40:41 -0000	1.2
@@ -46,8 +46,7 @@
 set title ""
 set content ""
 
-set context_bar \
-	[list [list "forum?[export_url_vars forum_id]" $forum_name] \
+set context_bar [ad_context_bar [list "forum?[export_url_vars forum_id]" $forum_name] \
               "Post"]
 
 set user_id [ad_verify_and_get_user_id]