Index: openacs-4/packages/dotlrn/www/spam.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/dotlrn/www/spam.tcl	7 Oct 2007 22:36:56 -0000	1.27
+++ openacs-4/packages/dotlrn/www/spam.tcl	16 Aug 2008 22:30:57 -0000	1.28
@@ -125,12 +125,15 @@
     -widget textarea \
     -html {rows 10 cols 80}
 
+set format_options [list [list "[_ dotlrn.Preformatted_Text]" "pre"] \
+                         [list "[_ dotlrn.Plain_Text]" "plain"] \
+                         [list "[_ dotlrn.HTML]" "html"]]
 
 element create spam_message format \
-    -label "Format" \
+    -label [_ dotlrn.Format] \
     -datatype text \
     -widget select \
-    -options {{"Preformatted Text" "pre"} {"Plain Text" "plain"} {HTML "html"}}
+    -options $format_options
 
 
 element create spam_message send_date \