Index: openacs-4/packages/lorsm/www/admin/course-add-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/course-add-3.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/lorsm/www/admin/course-add-3.tcl 16 Feb 2009 00:24:54 -0000 1.13
+++ openacs-4/packages/lorsm/www/admin/course-add-3.tcl 3 Mar 2009 22:40:40 -0000 1.14
@@ -137,8 +137,7 @@
regexp {([^/\\]+)$} $subdir match cr_dir
# add the folder to the CR
- ns_write "[_ lorsm.Processing_folder]: $cr_dir
"
+ ns_write "[_ lorsm.Processing_folder]: $cr_dir
"
set new_cr_folder_id [lors::cr::add_folder \
-parent_id $base_parent_id \
-folder_name $cr_dir]
@@ -153,8 +152,7 @@
ns_write "[_ lorsm.Processing_files]
"
foreach file $files {
set tempval [regsub $tmp_dir $file {}]
- ns_write " $tempval $tempval[_ lorsm.OK]
"
}
ns_write "