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 -N -r1.8 -r1.9 --- openacs-4/packages/lorsm/www/admin/course-add-3.tcl 8 Oct 2008 13:24:32 -0000 1.8 +++ openacs-4/packages/lorsm/www/admin/course-add-3.tcl 17 Oct 2008 10:46:31 -0000 1.9 @@ -42,19 +42,19 @@ -message_2 "[_ lorsm.lt_We_will_continue_auto]" -ns_write "

[_ lorsm.lt_Initiating_Updating_l]

" +ns_write "

[_ lorsm.lt_Initiating_Updating_l]

" # Is this a Blackboard6 package? set isBB [lors::imscp::bb6::isBlackboard6 -tmp_dir $tmp_dir] if {$isBB == 1} { - ns_write "

[_ lorsm.lt_Blackboard6_Content_P].
[_ lorsm.lt_Modifying_package_to_]" - ns_write "


[_ lorsm.lt_Cleaning_up_unused_ap]" + ns_write "

[_ lorsm.lt_Blackboard6_Content_P].
[_ lorsm.lt_Modifying_package_to_]

" + ns_write "
[_ lorsm.lt_Cleaning_up_unused_ap]" lors::imscp::bb6::clean_items -tmp_dir $tmp_dir -file "imsmanifest.xml" - ns_write "[_ lorsm.Done]" + ns_write "[_ lorsm.Done]" ns_write "
[_ lorsm.lt_Renaming_content_type]" lors::imscp::bb6::extract_html -tmp_dir $tmp_dir -file "imsmanifest.xml" - ns_write "[_ lorsm.Done]
" + ns_write "[_ lorsm.Done]" } @@ -179,12 +179,12 @@ set files [lors::cr::has_files -fs_dir $subdir] #For display purposes - ns_write "[_ lorsm.Processing_files]
" + ns_write "[_ lorsm.Processing_files]

" foreach file $files { set tempval [regsub $tmp_dir $file {}] - ns_write " $tempval[_ lorsm.OK]
" + ns_write " $tempval[_ lorsm.OK]
" } - ns_write "

" + ns_write "

" # if ![empty_string_p $files] { @@ -572,7 +572,7 @@ ns_log Debug "Delete temporary folder $tmp_dir" lors::imscp::deltmpdir $tmp_dir - ns_write "[_ lorsm.Done]


" + ns_write "[_ lorsm.Done]
" # jump to the front page ad_progress_bar_end -url [apm_package_url_from_id [ad_conn package_id]]/admin