Index: openacs-4/packages/lors/tcl/lors-imscp-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-imscp-procs.tcl,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/lors/tcl/lors-imscp-procs.tcl	10 Feb 2009 02:20:33 -0000	1.21
+++ openacs-4/packages/lors/tcl/lors-imscp-procs.tcl	31 May 2013 20:27:17 -0000	1.22
@@ -860,7 +860,7 @@
 
 } {
     set tmp_dir [file join [file dirname $tmpfile] [ns_mktemp "$dest_dir_base-XXXXXX"]]
-    if [catch { ns_mkdir $tmp_dir } errMsg ] {
+    if [catch { file mkdir $tmp_dir } errMsg ] {
         ns_log Notice "LORS::imscp::expand_file: Error creating directory $tmp_dir: $errMsg"
         return -code error "LORS::imscp::expand_file: Error creating directory $tmp_dir: $errMsg"
     }