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

Diff for /loncom/interface/lonaboutme.pm between versions 1.168 and 1.170

version 1.168, 2023/12/28 15:57:27 version 1.170, 2025/01/28 19:49:20
Line 358  sub handler { Line 358  sub handler {
         }          }
   
         if ($allowed) {          if ($allowed) {
               my $labeltext = &HTML::Entities::encode(&mt('Choose photo file'),'"&<>');
             $r->print(              $r->print(
                 '<form name="UploadPhoto" method="post" enctype="multipart/form-data" action="">'.                  '<form name="UploadPhoto" method="post" enctype="multipart/form-data" action="">'.
                 '<h3>'.&mt('Upload a Photo').'</h3>'.                  '<h3>'.&mt('Upload a Photo').'</h3>'.
                 '<p class="LC_info">'.                  '<p class="LC_info">'.
                 &mt('LON-CAPA will automatically scale your uploaded file so the image will not exceed a width of 400px and a height of 500px.').'</p>'.                  &mt('LON-CAPA will automatically scale your uploaded file so the image will not exceed a width of 400px and a height of 500px.').'</p>'.
                 '<input type="file" name="uploaddoc" size="50" />'.                  '<input type="file" name="uploaddoc" size="50" aria-label="'.$labeltext.'" />'.
                 '<input type="submit" name="storeupl" value="'.&mt('Upload').'" />'.                  '<input type="submit" name="storeupl" value="'.&mt('Upload').'" />'.
                 '<input type="hidden" name="popup" value="'.$env{'form.popup'}.'" />'.                  '<input type="hidden" name="popup" value="'.$env{'form.popup'}.'" />'.
                 '</form>');                  '</form>');
Line 644  sub portfolio_files { Line 645  sub portfolio_files {
         return $filecounts;          return $filecounts;
     }      }
     my $current_permissions =      my $current_permissions =
     &Apache::lonnet::get_portfile_permissions($cdom,$cnum);          &Apache::lonnet::get_portfile_permissions($cdom,$cnum);
     my %access_controls =      my %access_controls =
     &Apache::lonnet::get_access_controls($current_permissions);          &Apache::lonnet::get_access_controls($current_permissions);
     my $portaccess;      my $portaccess;
     if ($mode eq 'showlink') {      if ($mode eq 'showlink') {
         $portaccess = 'both';          $portaccess = 'both';
Removed from v.1.168  
changed lines
  Added in v.1.170

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