Index: openacs-4/packages/lorsm/www/course-add-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/Attic/course-add-3.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/lorsm/www/course-add-3.tcl	21 Apr 2005 16:03:53 -0000	1.7
+++ openacs-4/packages/lorsm/www/course-add-3.tcl	26 Apr 2005 16:33:14 -0000	1.8
@@ -201,7 +201,7 @@
         ## Opens imsmanifest.xml
 
         # open manifest file with tDOM
-        set doc [dom parse [read [open $tmp_dir/imsmanifest.xml]]]
+        dom parse [::tDOM::xmlReadFile $tmp_dir/imsmanifest.xml] doc
         # gets the manifest tree
         set manifest [$doc documentElement]
 
@@ -589,4 +589,4 @@
     ad_progress_bar_end -url [apm_package_url_from_id [ad_conn package_id]]
 
 
-}
\ No newline at end of file
+}