Diff for /loncom/interface/lonaboutme.pm between versions 1.88 and 1.92

version 1.88, 2008/12/17 13:00:36 version 1.92, 2009/02/12 21:15:47
Line 86  use Apache::lonlocal; Line 86  use Apache::lonlocal;
 use Apache::lonmsgdisplay();  use Apache::lonmsgdisplay();
 use Apache::lontemplate;  use Apache::lontemplate;
 use HTML::Entities();  use HTML::Entities();
   use Image::Magick;
   
 sub handler {  sub handler {
     my $r = shift;      my $r = shift;
Line 284  my $image; Line 285  my $image;
        if ($syllabus{'uploaded.photourl'}) {         if ($syllabus{'uploaded.photourl'}) {
    &Apache::lonnet::allowuploaded('/adm/aboutme',     &Apache::lonnet::allowuploaded('/adm/aboutme',
   $syllabus{'uploaded.photourl'});    $syllabus{'uploaded.photourl'});
    $image=qq{<img name="userPhoto" src="$syllabus{'uploaded.photourl'}" />};  
              #This call is to resize all "about me" images in the LonCapa System. When its done, you can remove this line.
      &Apache::lonnet::resizeImage(&Apache::lonnet::filelocation('',$syllabus{'uploaded.photourl'}));
   
   #--End Resize---
   
      $image=qq{<img name="userPhoto" src="$syllabus{'uploaded.photourl'}" />};
      
    if ($target eq 'tex') {     if ($target eq 'tex') {
        $image=&Apache::lonxml::xmlparse($r,'tex',$image);         $image=&Apache::lonxml::xmlparse($r,'tex',$image);
    }     }
Line 321  my $image; Line 328  my $image;
  &Apache::lontemplate::start_ContentBox($r);   &Apache::lontemplate::start_ContentBox($r);
  &print_portfiles_link($r,$is_course);   &print_portfiles_link($r,$is_course);
  if(&Apache::lonrss::advertisefeeds($cnum,$cdom) ne ''){   if(&Apache::lonrss::advertisefeeds($cnum,$cdom) ne ''){
  $r->print('<div class="ContentBoxSpecial">');   $r->print('<div class="LC_ContentBoxSpecial">');
  $r->print('<h4 class="hcell">'.'RSS Feeds and Blogs'.'</h4>');   $r->print('<h4 class="LC_hcell">'.'RSS Feeds and Blogs'.'</h4>');
  $r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom));   $r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom));
  $r->print('</div>');   $r->print('</div>');
  }   }
Line 372  my $image; Line 379  my $image;
   ('View recent activity by this student',    ('View recent activity by this student',
    $cnum,$cdom).('&nbsp;'x2));     $cnum,$cdom).('&nbsp;'x2));
     }      }
     $r->print(&Apache::loncommon::noteswrapper('Add Records',$cnum,$cdom));      $r->print(&Apache::loncommon::noteswrapper(&mt('Add Records'),$cnum,$cdom));
  } else {   } else {
     $r->print('\\\\\textbf{'.&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course').'}\\\\'.&mt('Shared by course faculty and staff').'\\\\\\\\');      $r->print('\\\\\textbf{'.&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course').'}\\\\'.&mt('Shared by course faculty and staff').'\\\\\\\\');
     &Apache::lonmsgdisplay::disfacetoface($r,$cnum,$cdom);      &Apache::lonmsgdisplay::disfacetoface($r,$cnum,$cdom);
Line 442  sub print_portfiles_link { Line 449  sub print_portfiles_link {
                          difl => 'Display file listing',                           difl => 'Display file listing',
              );                                    );                     
     if ($filecounts->{'both'} > 0) {      if ($filecounts->{'both'} > 0) {
  $output = '<div class="ContentBoxSpecial"><h4 class="hcell">';   $output = '<div class="LC_ContentBoxSpecial"><h4 class="LC_hcell">';
  $output .= ($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h4>';   $output .= ($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h4>';
                   
  #$output = '<h4>'.($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h4>';   #$output = '<h4>'.($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h4>';
Line 764  sub parse_directory { Line 771  sub parse_directory {
  '&nbsp;'.$showname.'</a>';   '&nbsp;'.$showname.'</a>';
     $output.='</td><td>';      $output.='</td><td>';
     if ($have_meta) {      if ($have_meta) {
  $output.= '<a href="'.$url.'.meta"><img alt="'.&mt('Catalog Information').'" src="'.   $output.= '<a href="'.$url.'.meta"><img alt="'.&mt('Metadata').'" src="'.
  &Apache::loncommon::lonhttpdurl('/res/adm/pages/catalog.gif').   &Apache::loncommon::lonhttpdurl('/res/adm/pages/catalog.gif').
  '" class="LC_icon" /></a>';   '" class="LC_icon" /></a>';
     }      }

Removed from v.1.88  
changed lines
  Added in v.1.92


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