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.2 -r1.21.6.3
--- openacs-4/packages/dotlrn/www/spam.tcl	21 Jun 2004 19:55:37 -0000	1.21.6.2
+++ openacs-4/packages/dotlrn/www/spam.tcl	22 Jun 2004 00:41:36 -0000	1.21.6.3
@@ -100,7 +100,7 @@
     -label "[_ dotlrn.Message_Type]" \
     -datatype text \
     -widget select \
-    -options {{"[_ dotlrn.Plain_Text]" "text"} {"[_ dotlrn.HTML]" "html"}} \
+    -options [list [list [_ dotlrn.Plain_Text] "text"] [list [_ dotlrn.HTML] "html"]] \
     -value "text"
 
 element create spam_message send_date \