Index: openacs-4/packages/xowiki/tcl/import-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/import-procs.tcl,v
diff -u -r1.42.2.4 -r1.42.2.5
--- openacs-4/packages/xowiki/tcl/import-procs.tcl	5 Nov 2019 17:19:37 -0000	1.42.2.4
+++ openacs-4/packages/xowiki/tcl/import-procs.tcl	11 Aug 2020 11:51:49 -0000	1.42.2.5
@@ -70,9 +70,9 @@
       }
     }
     if {$item_id == 0} {
-      set n [$object save_new -use_given_publish_date [$object exists publish_date] \
-                 -creation_user [$object set modifying_user] ]
-      $object set item_id $n
+      $object save_new \
+          -use_given_publish_date [$object exists publish_date] \
+          -creation_user [$object set modifying_user]
       set item $object
       #:msg "$object added: [$object name]"
       :report_line $object added