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 -N -r1.80 -r1.81
--- openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl	30 Jul 2007 11:25:35 -0000	1.80
+++ openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl	30 Jul 2007 12:04:07 -0000	1.81
@@ -2281,13 +2281,14 @@
         switch -glob -- $__fn {
           __* {error not_allowed}
           _*  {set __value [$p set [string range $__fn 1 end]]}
-	    default {
-		if {[exists_and_not_null __ia($__fn)]} {
-		    set __value $__ia($__fn)
-		} else {
-		    set __value ""
-		}
-	    }
+          default {
+            if {[info exists __ia($__fn)]} {
+              set __value $__ia($__fn)
+            } else {
+              # the field was added after the current entry was created
+              set __value ""
+            }
+          }
         }
         if {[$__ff($__fn) istype ::xowiki::FormField::richtext]} {
           $__c set $__fn.richtext 1