--- loncom/imspackages/imsimportdocs.pm 2009/08/17 03:52:09 1.23 +++ 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.23 2009/08/17 03:52:09 raeburn 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(< - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  -
1  -    - Specify the Course Management system used to create the package.   - -
 
  - -Please choose the CMS used to create your IMS content package.   - - -
 
 
2  -    - 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( + '
' + .'

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

' + ); } @@ -442,7 +384,7 @@ 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.') + .'

' + ); } }