Index: openacs-4/packages/xowiki/tcl/package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v
diff -u -r1.71 -r1.72
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	22 Jul 2007 12:01:27 -0000	1.71
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	25 Jul 2007 10:54:47 -0000	1.72
@@ -801,6 +801,7 @@
     set object_type [my query_parameter object_type "::xowiki::Page"]
     set autoname [my get_parameter autoname 0]
     set page [$object_type new -volatile -parent_id $folder_id -package_id $id]
+    $page set name ""
     return [$page edit -new true -autoname $autoname]
   }
 
Index: openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/Attic/xowiki-portlet-procs.tcl,v
diff -u -r1.76 -r1.77
--- openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl	24 Jul 2007 20:48:33 -0000	1.76
+++ openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl	25 Jul 2007 10:54:47 -0000	1.77
@@ -2169,15 +2169,18 @@
     }
 
     set form_constraints [$form_item form_constraints]
-    set cr_field_spec [::xowiki::PageInstance get_short_spec_from_form_constraints \
-                           -name @cr_fields \
-                           -form_constraints $form_constraints]
+    # set cr_field_spec [::xowiki::PageInstance get_short_spec_from_form_constraints \
+    #                            -name @cr_fields \
+    #                            -form_constraints $form_constraints]
+    # if some fields are hidden in the form, there might still be values (creation_user, etc)
+    # maybe filter hidden? ignore for the time being.
+    set cr_field_spec ""
+    #
     set field_spec    [::xowiki::PageInstance get_short_spec_from_form_constraints \
                            -name @fields \
                            -form_constraints $form_constraints]
 
     foreach spec_name $field_names {
-      # TODO: the short_spec does not contain @cr_fields
       set short_spec [::xowiki::PageInstance get_short_spec_from_form_constraints \
                           -name $spec_name \
                           -form_constraints $form_constraints]
Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.154 -r1.155
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	24 Jul 2007 20:48:33 -0000	1.154
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	25 Jul 2007 10:54:47 -0000	1.155
@@ -1273,7 +1273,7 @@
     #
     foreach name_and_spec $form_constraints {
       foreach {spec_name short_spec} [split $name_and_spec :] break
-      if {$spec_name eq "@table"} continue
+      if {$spec_name eq "@table" || $spec_name eq "@categories"} continue
 
       #my msg "checking spec '$short_spec' for form field '$spec_name'"
       if {[catch {
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.91 -r1.92
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	24 Jul 2007 20:48:33 -0000	1.91
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	25 Jul 2007 10:54:47 -0000	1.92
@@ -721,7 +721,7 @@
       # for named entries, just set the entry fields to empty,
       # without changing the instance variables
       if {[my is_new_entry [my name]]} {
-	$ff(_title) value ""
+	if {![$ff(_title) istype ::xowiki::FormField::hidden]} {$ff(_title) value ""}
 	if {!$anon_instances} {$ff(_name) value ""}
       }
     }