Index: openacs-4/packages/dotlrn/www/spam-recipients.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam-recipients.adp,v
diff -u -r1.1.2.5 -r1.1.2.6
--- openacs-4/packages/dotlrn/www/spam-recipients.adp	14 Sep 2004 15:34:27 -0000	1.1.2.5
+++ openacs-4/packages/dotlrn/www/spam-recipients.adp	19 Aug 2005 10:17:24 -0000	1.1.2.6
@@ -20,7 +20,7 @@
 
 <master src="dotlrn-master">
 <property name="title">@spam_name@</property>
-<property name="context_bar">@context_bar@</property>
+<property name="context">@context;noquote@</property>
 
 
 <h3>#dotlrn.Choose_members_to_receive#</h3>
Index: openacs-4/packages/dotlrn/www/spam-recipients.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam-recipients.tcl,v
diff -u -r1.1.2.3 -r1.1.2.4
--- openacs-4/packages/dotlrn/www/spam-recipients.tcl	2 Aug 2004 10:14:04 -0000	1.1.2.3
+++ openacs-4/packages/dotlrn/www/spam-recipients.tcl	19 Aug 2005 10:17:24 -0000	1.1.2.4
@@ -5,8 +5,9 @@
 }
 
 set spam_name [bulk_mail::parameter -parameter PrettyName -default Spam]
-set context_bar [list [list $referer [_ dotlrn.Admin]] "$spam_name [_ dotlrn.Community]"]
+set context [list [list $referer [_ dotlrn.Admin]] "$spam_name [_ dotlrn.Community]"]
 
+
 if { ![exists_and_not_null community_id] } {
   set community_id [dotlrn_community::get_community_id]
 }
Index: openacs-4/packages/dotlrn/www/spam.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam.adp,v
diff -u -r1.20.6.1 -r1.20.6.2
--- openacs-4/packages/dotlrn/www/spam.adp	8 Aug 2004 05:56:05 -0000	1.20.6.1
+++ openacs-4/packages/dotlrn/www/spam.adp	19 Aug 2005 10:17:24 -0000	1.20.6.2
@@ -20,7 +20,7 @@
 
 <master>
 <property name="title">@spam_name@</property>
-<property name="context_bar">@context_bar@</property>
+<property name="context">@context;noquote@</property>
 
 <formtemplate id="spam_message"></formtemplate>
 
Index: openacs-4/packages/dotlrn/www/spam.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam.tcl,v
diff -u -r1.21.6.11 -r1.21.6.12
--- openacs-4/packages/dotlrn/www/spam.tcl	6 Mar 2005 15:44:22 -0000	1.21.6.11
+++ openacs-4/packages/dotlrn/www/spam.tcl	19 Aug 2005 10:17:24 -0000	1.21.6.12
@@ -73,13 +73,13 @@
 	}
     }
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     portal_id:onevalue
 }
 
 
 set spam_name [bulk_mail::parameter -parameter PrettyName -default [_ dotlrn.Spam_]]
-set context_bar [list [list $referer [_ dotlrn.Admin]] "$spam_name [_ dotlrn.Community]"]
+set context [list [list $referer [_ dotlrn.Admin]] "$spam_name [_ dotlrn.Community]"]
 
 if {[empty_string_p $community_id]} {
     set community_id [dotlrn_community::get_community_id]