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

Diff for /loncom/interface/portfolio.pm between versions 1.214 and 1.216

version 1.214, 2009/05/06 13:38:34 version 1.216, 2009/10/23 09:33:45
Line 88  sub display_common { Line 88  sub display_common {
   
         my $iconpath= $r->dir_config('lonIconsURL') . "/";          my $iconpath= $r->dir_config('lonIconsURL') . "/";
         my %lt=&Apache::lonlocal::texthash(          my %lt=&Apache::lonlocal::texthash(
  'upload' => 'Upload',                     'upload'          => 'Upload',
  'upload_label' => 'Upload file to current directory',                     'upload_label'    => 'Upload file to current directory',
  'createdir' => 'Create Subdirectory',                     'createdir'       => 'Create Subdirectory',
  'createdir_label' =>                      'createdir_label' => 'Create subdirectory in current directory',
  'Create subdirectory in current directory',                     'parse'           => 'Upload embedded images/multimedia/css/linked files if HTML file',
                                          'parse' => 'If HTML file, upload embedded images/multimedia/css/linked files'                 );
                                             );  
         my $escuri = &HTML::Entities::encode($r->uri,'&<>"');          my $escuri = &HTML::Entities::encode($r->uri,'&<>"');
  my $help_fileupload = &Apache::loncommon::help_open_topic('Portfolio AddFiles');   my $help_fileupload = &Apache::loncommon::help_open_topic('Portfolio AddFiles');
  my $help_createdir = &Apache::loncommon::help_open_topic('Portfolio CreateDirectory');   my $help_createdir = &Apache::loncommon::help_open_topic('Portfolio CreateDirectory');
Line 105  sub display_common { Line 104  sub display_common {
             $parse_check = <<"END";              $parse_check = <<"END";
         <br />          <br />
         <span class="LC_nobreak">          <span class="LC_nobreak">
          <label>$lt{'parse'}           <label>
          <input type="checkbox" name="parserflag" checked="checked" />            <input type="checkbox" name="parserflag" checked="checked" />
             $lt{'parse'}
          </label>           </label>
         </span>          </span>
 END  END
Line 158  END Line 158  END
         'fieldname'     => $env{"form.fieldname"},          'fieldname'     => $env{"form.fieldname"},
         'continue'      => $env{"form.continue"}          'continue'      => $env{"form.continue"}
     );      );
       $r->print('<br clear="all" />');
     $r->print('<span class="LC_current_location">'.&make_anchor($url,\%anchor_fields,$port_path).'/');      $r->print('<span class="LC_current_location">'.&make_anchor($url,\%anchor_fields,$port_path).'/');
     if (@tree > 1){      if (@tree > 1){
         my $newCurrentPath = '/';          my $newCurrentPath = '/';
Removed from v.1.214  
changed lines
  Added in v.1.216

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