Index: openacs-4/packages/contacts/lib/oo_mailing.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/oo_mailing.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/contacts/lib/oo_mailing.tcl	27 Dec 2005 08:42:18 -0000	1.2
+++ openacs-4/packages/contacts/lib/oo_mailing.tcl	27 Dec 2005 08:52:16 -0000	1.3
@@ -39,7 +39,7 @@
     set footer ""
 }
 
-
+set spoiler_options [util::find_all_files -extension jpg -path "/web/wieners/packages/wieners/templates/spoiler"]
     
 set date [split [dt_sysdate] "-"]
 append form_elements {
@@ -54,10 +54,10 @@
     {date:date(date)
 	{label "[_ contacts.Date]"}
     }
-    {spoiler:text(text),optional
+    {spoiler:text(select),optional
         {label "[_ contacts.Spoiler]"} 
         {help_text "[_ contacts.Spoiler_help_text]"}
-        {html {size 45 maxlength 1000}}
+	{options $spoiler_options}
     }
     {content:richtext(richtext)
 	{label "[_ contacts.Message]"}
@@ -153,7 +153,7 @@
 	}
 	
 
-        set return [contact::oo::change_content2 -oo_filename "vorlage.odt" -oo_path "/web/" -content $return]
+        set return [contact::oo::change_content -oo_filename "vorlage.odt" -oo_path "/web" -content $return]
 	
 	# onLoad=\"window.print()\"
 	ns_return 200 text/html "