Index: openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl,v diff -u -N -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl 1 Feb 2006 17:53:10 -0000 1.1.2.1 +++ openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl 25 Apr 2006 10:14:25 -0000 1.1.2.2 @@ -308,7 +308,11 @@ # gets rid of the path and leaves the name of the directory # if course_name is changed, then use that name. Otherwise it will use the default folder name given - set course_name $upload_file + #set course_name $upload_file + # FIX ME: the course name is taken from the uploaded file, it should be taken somewhere else + regsub {(\.[a-zA-Z0-9]+)$} $upload_file "" course_name + regsub {_} $course_name " " course_name + regexp {([^/\\]+)$} $fs_dir match cr_dir # We need to separate folders (since now all are cr_items) one for the files (content) and the other