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

Diff for /loncom/interface/portfolio.pm between versions 1.236 and 1.238

version 1.236, 2012/07/30 13:10:57 version 1.238, 2012/12/17 02:06:32
Line 650  sub done { Line 650  sub done {
         'symb'      => $env{'form.symb'},          'symb'      => $env{'form.symb'},
         'mode'      => $env{'form.mode'}          'mode'      => $env{'form.mode'}
     );      );
     my $result = '<h3>'.&make_anchor($url,\%anchor_fields,&mt($message)).'</h3>';      my $result = '<p>'.&make_anchor($url,\%anchor_fields,&mt($message)).'</p>';
     return $result;      return $result;
 }  }
   
Line 670  sub delete { Line 670  sub delete {
             $r->print('<p>'.&mt('Delete [_1]?',&display_file(undef,\@files)).'</p>');              $r->print('<p>'.&mt('Delete [_1]?',&display_file(undef,\@files)).'</p>');
             &close_form($r,$url);              &close_form($r,$url);
         } else {          } else {
             $r->print("No file was checked to delete.<br />");              $r->print('<p class="LC_warning">'.&mt('No file was checked to delete.').'</p>');
             $r->print(&done(undef,$url));              $r->print(&done(undef,$url));
         }          }
     }      }
Line 2119  sub print_dependency_form { Line 2119  sub print_dependency_form {
             $r->print('<h3>'.&mt("Reference Information").'</h3>');              $r->print('<h3>'.&mt("Reference Information").'</h3>');
         }          }
         if ($num) {          if ($num) {
             $r->print('<p>'.&mt("Completed upload of the file. This file contained references to other files. You must upload the referenced files or else the uploaded file may not work properly.").'</p>'.              $r->print('<p>'.&mt('Completed upload of the file.').' '.
                         &mt('This file contained references to other files.').' '.
                         &mt('You must upload the referenced files or else the uploaded file may not work properly.').
                         '</p>'.
                       '<p>'.&mt("Please select the locations from which the referenced files are to be uploaded.").'</p>'.                        '<p>'.&mt("Please select the locations from which the referenced files are to be uploaded.").'</p>'.
                        $embedded.                         $embedded.
                        '<p>'.&mt('or').'</p>'.&done('Return to directory',$url));                         '<p>'.&mt('or').'</p>'.&done('Return to directory',$url));
Line 2617  sub handler { Line 2620  sub handler {
         }          }
     }      }
     if (($env{'form.storeupl'}) & (!$env{'form.uploaddoc.filename'})){      if (($env{'form.storeupl'}) & (!$env{'form.uploaddoc.filename'})){
     $r->print('<span class="LC_error">');      $r->print('<span class="LC_warning">');
     $r->print(&mt('No file was selected to upload.').' ');      $r->print(&mt('No file was selected to upload.').' ');
  $r->print(&mt('To upload a file, click <strong>Browse...</strong> and select a file, then click <strong>Upload</strong>.'));   $r->print(&mt('To upload a file, click <strong>Browse...</strong> and select a file, then click <strong>Upload</strong>.'));
  $r->print('</span>');   $r->print('</span>');
Removed from v.1.236  
changed lines
  Added in v.1.238

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