Index: openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl,v
diff -u -r1.69 -r1.70
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl 5 Jul 2007 10:55:08 -0000 1.69
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl 7 Jul 2007 15:49:10 -0000 1.70
@@ -633,7 +633,7 @@
set clean_content $content
regsub -all "
" $clean_content "" clean_content
regsub -all "
" $clean_content "" clean_content - ns_log notice "--vaidate_form_content '$content' clean='$clean_content', stripped='[string trim $clean_content]'" + #ns_log notice "--vaidate_form_content '$content' clean='$clean_content', stripped='[string trim $clean_content]'" if {[string trim $clean_content] eq ""} { set text [list "" $mime]} return 1 }