--- loncom/imspackages/imsimport.pm 2006/03/23 23:12:21 1.14 +++ loncom/imspackages/imsimport.pm 2006/03/27 18:39:55 1.17 @@ -46,6 +46,8 @@ sub jscript_one { 'js_ready' => 1,}); my $end_page = &Apache::loncommon::end_page({'js_ready' => 1,}); + $start_page =~ s/\n/\\n/g; + $end_page =~ s/\n/\\n/g; $$jsref = <<"END_OF_ONE"; function verify() { @@ -78,10 +80,10 @@ function createWin() { newWindow.document.write("  \\n") newWindow.document.write("
\\n") newWindow.document.write("Enter the name of the new directory where you will store the contents of your IMS package.

") - newWindow.document.write("") - newWindow.document.write("") - newWindow.document.write("") - newWindow.document.write("$fullpath") + newWindow.document.write("") + newWindow.document.write("") + newWindow.document.write("") + newWindow.document.write("$fullpath") newWindow.document.write("") newWindow.document.write("\\n") newWindow.document.write("") @@ -300,11 +302,11 @@ sub display_one { Please choose the CMS used to create your IMS content package.   @@ -327,7 +329,7 @@ Please choose the CMS used to create you   -Please choose a destination LON-CAPA directory in which to store the contents of the IMS package file. +Please choose a destination LON-CAPA directory in which to store the contents of the IMS package file.
@@ -339,9 +341,9 @@ Please choose a destination LON-CAPA dir - - - + + + @@ -352,10 +354,10 @@ Please choose a destination LON-CAPA dir
- + - +
@@ -411,7 +413,7 @@ sub display_two { $manifest_result = &Apache::imsprocessor::process_manifest($cms,$tempdir,\%resources,\%items,\%hrefs,\%resinfo,'choose',\%includedres,\%includeditems); if ($manifest_result eq 'ok') { foreach my $res (sort keys %resources) { - if ($cms eq 'bb5' || $cms eq 'bb6' || $cms eq 'webct4') { + if ($cms eq 'bb5' || $cms eq 'bb6' || $cms eq 'webctce4') { foreach my $area (keys %{$$cmsmap{$cms}}) { if ($resources{$res}{type} eq $$cmsmap{$cms}{$area}) { $count{$area} ++; @@ -490,13 +492,13 @@ ENDBLOCK if ($area eq 'board') { $r->print("    "); } elsif ($area eq 'users') { $r->print("    "); @@ -543,7 +545,7 @@ ENDBLOCKTWO

Choose course:   @@ -587,10 +589,10 @@ ENDBLOCK
- + - +