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 -N -r1.68 -r1.69
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	11 Jul 2007 11:57:14 -0000	1.68
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	11 Jul 2007 15:29:38 -0000	1.69
@@ -19,6 +19,8 @@
     if {$description eq ""} {
       set description [my get_description $content]
     }
+    
+    #set ::META(description) $description
 
     if {[ns_conn isconnected]} {
       set url         "[ns_conn location][::xo::cc url]"
@@ -347,9 +349,11 @@
     } else {
       set default ""
     }
-
+    if {![my exists name]} {
+      my set name [self]
+    }
     set f [FormField new -name $name \
-               -id        [::xowiki::Portlet html_id F.[my name].$name] \
+               -id        [::xowiki::Portlet html_id F.[my set name].$name] \
                -locale    [my nls_language] \
                -label     $label \
                -type      [expr {[$slot exists datatype] ?  [$slot set datatype] : "text"}] \