Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v diff -u -r1.223 -r1.224 --- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 27 Mar 2009 13:02:28 -0000 1.223 +++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 29 Mar 2009 14:19:19 -0000 1.224 @@ -1187,14 +1187,14 @@ $f help_text "" } } - if {[$f name] eq "_name" || [$f name] eq "_nls_language"} { + if {[$f exists transmit_field_always] + && [lsearch [$f info mixin] ::xowiki::formfield::omit] > -1} { # Never omit these fields, this would cause problems with - # autonames and empty languages. Set these fields to hidden. - if {[lsearch [$f info mixin] ::xowiki::formfield::omit] > -1} { - $f remove_omit - $f class ::xowiki::formfield::hidden - $f initialize - } + # autonames and empty languages. Set these fields to hidden + # instead. + $f remove_omit + $f class ::xowiki::formfield::hidden + $f initialize #my msg "$f [$f name] [$f info class] [$f info mixin]" } } @@ -1375,6 +1375,9 @@ } } + $ff(_name) set transmit_field_always 1 + $ff(_nls_language) set transmit_field_always 1 + # some final sanity checks my form_fields_sanity_check $form_fields my post_process_form_fields $form_fields