Index: openacs-4/packages/forums/www/message-post.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-post.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/forums/www/message-post.tcl	10 Jan 2003 14:01:08 -0000	1.19
+++ openacs-4/packages/forums/www/message-post.tcl	20 Jan 2003 12:56:19 -0000	1.20
@@ -36,7 +36,7 @@
     -datatype text \
     -widget text \
     -html {size 60} \
-    -validate { {expr ![empty_string_p [string trim $value]]} {[_ forums.lt_Please_enter_a_subjec]} }
+    -validate { {expr ![empty_string_p [string trim $value]]} "[_ forums.lt_Please_enter_a_subjec]" }
 
 # we use ns_queryget to get the value of html_p because it won't be defined
 # until the next element -DaveB
@@ -123,7 +123,7 @@
         }
 
         set context [list [list "./forum-view?forum_id=$forum_id" "$forum(name)"]]
-        lappend context {[_ forums.Post_a_Message]}
+        lappend context "[_ forums.Post_a_Message]"
 
         ad_return_template message-post-confirm
         return
Index: openacs-4/packages/forums/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/search.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/forums/www/search.tcl	16 Jan 2003 13:49:30 -0000	1.9
+++ openacs-4/packages/forums/www/search.tcl	20 Jan 2003 12:56:19 -0000	1.10
@@ -46,7 +46,7 @@
     set messages:rowcount 0
 }
 
-set context {[_ forums.Search]}
+set context "[_ forums.Search]"
 
 ad_return_template
 
Index: openacs-4/packages/forums/www/user-history.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/user-history.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/forums/www/user-history.tcl	18 Nov 2002 18:01:08 -0000	1.8
+++ openacs-4/packages/forums/www/user-history.tcl	20 Jan 2003 12:56:19 -0000	1.9
@@ -14,14 +14,14 @@
 set package_id [ad_conn package_id]
 
 # choosing the view
-set dimensional_list {
+set dimensional_list "
     {
-        view "[_ forums.View]:" date {
-            {date "[_ forums.by_Date]" {}}
-            {forum "[_ forums.by_Forum]" {}}
+        view \"[_ forums.View]:\" date {
+            {date \"[_ forums.by_Date]\" {}}
+            {forum \"[_ forums.by_Forum]\" {}}
         }
     }
-}
+"
 
 set query select_messages
 if {[string equal $view forum]} {
@@ -38,7 +38,7 @@
 
 set dimensional_chunk [ad_dimensional $dimensional_list]
 
-set context {[_ forums.Posting_History]}
+set context "[_ forums.Posting_History]"
 
 ad_return_template