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.103 -r1.104
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	25 Sep 2008 20:36:55 -0000	1.103
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	27 Sep 2008 17:27:56 -0000	1.104
@@ -238,9 +238,8 @@
     if {[$data form_parameter __new_p 0]
         || $old_name ne $name
       } {
-      set folder_id [$data parent_id]
-      #my msg "exists in db [::xo::db::CrClass lookup -name $name -parent_id $folder_id]"
-      return [expr {[::xo::db::CrClass lookup -name $name -parent_id $folder_id] == 0}]
+      #my msg "exists in db [::xo::db::CrClass lookup -name $name -parent_id [$data parent_id]]"
+      return [expr {[::xo::db::CrClass lookup -name $name -parent_id [$data parent_id]] == 0}]
     }
     return 1
   }