--- loncom/imspackages/imsimportdocs.pm 2007/08/21 18:22:41 1.21 +++ loncom/imspackages/imsimportdocs.pm 2009/11/06 17:16:53 1.24 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: imsimportdocs.pm,v 1.21 2007/08/21 18:22:41 albertel Exp $ +# $Id: imsimportdocs.pm,v 1.24 2009/11/06 17:16:53 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -207,96 +207,38 @@ sub display_one { my ($r) = @_; &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['folder']); - $r->print(< - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  -
  -    - Specify the Course Management system used to create the package.   - -
 
  - -Please choose the CMS used to create your IMS content package.   - - -
 
 
  -    - Locate the IMS content package you wish to upload.   - -
 
  - - - -
 
 If you have selected the CMS, and located the IMS package, you should click the 'Upload IMS package' button to upload the file to the server.
 
- - - - -
- - - -
-
- - - - -ENDBLOCK + $r->print( + '
' + .&Apache::lonhtmlcommon::topic_bar( + 1,&mt('Specify the Course Management system used to create the package')) + .&mt('Please choose the CMS used to create your IMS content package:').' ' + .'' + ); + $r->print( + &Apache::lonhtmlcommon::topic_bar( + 2,&mt('Locate the IMS content package you wish to upload')) + .'' + .'' + .&mt('File:') + .' ' + ); + $r->print( + '
' + .'

' + .'' + .' ' + .'' + .'

' + ); } @@ -346,7 +288,7 @@ sub display_two { $count{$area} ++; } } - } elsif ($cms eq 'angel') { + } elsif ($cms eq 'angel5') { foreach my $area (keys %{$cmsmap{$cms}}) { if ($area eq 'doc') { if (grep/^$resources{$res}{type}$/,@{$cmsmap{$cms}{doc}}) { @@ -369,7 +311,7 @@ sub display_two { - + 3    Choose which content types you wish to import @@ -439,10 +381,10 @@ ENDBLOCK  

- + 4    - Choose display options for listing of contents of top level of package. + Choose display options for listing of contents of top level of package @@ -481,7 +423,7 @@ ENDBLOCK
- + @@ -496,10 +438,19 @@ ENDBLOCK
ENDDOCUMENT } else { - $r->print("Unpacking of your IMS package failed because an IMS manifest file was not located in the package\n"); + $r->print( + '

' + .&mt('Unpacking of your IMS package failed because an IMS manifest file was not located in the package.') + .'

' + ); } } else { - $r->print("Processing of your IMS package failed because the file you uploaded could not be unzipped\n"); + $r->print( + '

' + .&mt('Processing of your IMS package failed because the file you' + .' uploaded could not be unzipped.') + .'

' + ); } } @@ -553,7 +504,7 @@ sub display_three { foreach my $area (@{$areas}) { if (defined($env{"form.$area"}) && ($env{'form.'.$area} ne '')) { - if ($cms eq 'angel' && $area eq 'doc') { + if ($cms eq 'angel5' && $area eq 'doc') { foreach (@{$cmsmap{$cms}{$area}}) { $importareas{$_} = 1; } @@ -673,7 +624,7 @@ sub display_three { - + 5    Your import is complete