Index: openacs-4/packages/categories/tcl/category-xml-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/category-xml-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/categories/tcl/category-xml-procs.tcl	26 Jan 2005 17:36:23 -0000	1.1
+++ openacs-4/packages/categories/tcl/category-xml-procs.tcl	27 Apr 2005 08:22:00 -0000	1.2
@@ -18,10 +18,7 @@
         error {Cannot open file for reading}
     }
 
-    set fp [open $file r]
-    set xml [read $fp]
-    close $fp
-    return [import -site_wide=$site_wide_p $xml]
+    return [import -site_wide=$site_wide_p [::tDOM::xmlReadFile $file]]
 }
 
 ad_proc -public ::category_tree::xml::import {