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.27.2.2 -r1.27.2.3
--- openacs-4/packages/xowiki/tcl/import-procs.tcl	13 Oct 2013 18:13:58 -0000	1.27.2.2
+++ openacs-4/packages/xowiki/tcl/import-procs.tcl	11 Feb 2014 11:58:18 -0000	1.27.2.3
@@ -306,7 +306,7 @@
 	# check for child objects of the item
 	#
 	set sql [::xowiki::Page instance_select_query -folder_id $item_id -with_subtypes true]
-	db_foreach [my qn export_child_obj] $sql {
+	::xo::dc foreach export_child_obj $sql {
 	  if {![info exists items($item_id)]} {
 	    ::xo::db::CrClass get_instance_from_db -item_id $item_id
 	    ns_log notice "--export including child $item_id [$item_id name]"