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.40 -r1.41
--- openacs-4/packages/xowiki/tcl/import-procs.tcl	10 Jul 2018 07:47:08 -0000	1.40
+++ openacs-4/packages/xowiki/tcl/import-procs.tcl	17 Dec 2018 17:58:58 -0000	1.41
@@ -287,7 +287,7 @@
     #
     while {1} {
       set new 0
-      if {[llength [array names items]] > 0} {
+      if {[array size items] > 0} {
         ns_log notice "--export works on [array names items]"
       }
       foreach item_id [array names items] {