[BACK]Return to londocs.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/londocs.pm between versions 1.174 and 1.175

version 1.174, 2005/04/07 06:56:23 version 1.175, 2005/04/07 07:34:52
Line 272  sub exportcourse { Line 272  sub exportcourse {
         &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},          &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
                                             ['archive','discussion']);                                              ['archive','discussion']);
   
         my @exportitems = ();          my @exportitems = &Apache::loncommon::get_env_multiple('form.archive');
         if (defined($env{'form.archive'})) {          my @discussions = &Apache::loncommon::get_env_multiple('form.discussion');
             if (ref($env{'form.archive'}) eq 'ARRAY') {  
                 @exportitems = @{$env{'form.archive'}};  
             } else {  
                 $exportitems[0] = $env{'form.archive'};  
             }  
         }  
         my @discussions = ();  
         if (defined($env{'form.discussion'})) {  
             if (ref($env{'form.discussion'}) eq 'ARRAY') {  
                 @discussions = $env{'form.discussion'};  
             } else {  
                 $discussions[0] = $env{'form.discussion'};  
             }  
         }  
         if (@exportitems == 0 && @discussions == 0) {          if (@exportitems == 0 && @discussions == 0) {
             $outcome = '<br />As you did not select any content items or discussions for export, an IMS package has not been created.  Please <a href="javascript:history.go(-1)">go back</a> to select either content items or discussions for export';              $outcome = '<br />As you did not select any content items or discussions for export, an IMS package has not been created.  Please <a href="javascript:history.go(-1)">go back</a> to select either content items or discussions for export';
         } else {          } else {
Removed from v.1.174  
changed lines
  Added in v.1.175

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>