Index: openacs.org-dev/packages/forums/www/message-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/forums/www/message-view.tcl,v
diff -u -r1.6 -r1.7
--- openacs.org-dev/packages/forums/www/message-view.tcl	2 Nov 2002 13:57:03 -0000	1.6
+++ openacs.org-dev/packages/forums/www/message-view.tcl	3 Nov 2002 03:47:08 -0000	1.7
@@ -103,9 +103,11 @@
 }
 
 set context [list [list "./forum-view?forum_id=$message(forum_id)" "$message(forum_name)"]]
+
 if {![empty_string_p $message(parent_id)]} {
-    lappend context_bar [list "./message-view?message_id=$message(root_message_id)" "Entire Thread"]
+    lappend context [list "./message-view?message_id=$message(root_message_id)" "Entire Thread"]
 }
+
 lappend context {One Message}
 
 if {[string equal $forum(presentation_type) flat]} {