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

Diff for /loncom/interface/lonsyllabus.pm between versions 1.58 and 1.61

version 1.58, 2007/03/08 01:58:45 version 1.61, 2007/07/27 00:21:39
Line 66  sub handler { Line 66  sub handler {
   
 # ------------------------------------------------------------ Print the screen  # ------------------------------------------------------------ Print the screen
   
     my $rss_link =  
  &Apache::lonrss::rss_link('http://'.$ENV{'HTTP_HOST'}.'/public/'.$cdom.'/'.$cnum.'/Course_Announcements.rss');  
   
     if ($target eq 'tex') {      if ($target eq 'tex') {
  $r->print(&Apache::lonprintout::print_latex_header($env{'form.latex_type'}));   $r->print(&Apache::lonprintout::print_latex_header($env{'form.latex_type'}));
     }       } 
Line 112  sub handler { Line 109  sub handler {
                 
 # ----------------------------------------------------------------- Make header   # ----------------------------------------------------------------- Make header 
     if ($target ne 'tex') {      if ($target ne 'tex') {
    my $rss_link = &Apache::lonrss::rss_link($cnum,$cdom);
  my $start_page =    my $start_page = 
     &Apache::loncommon::start_page("Syllabus", $rss_link,      &Apache::loncommon::start_page("Syllabus", $rss_link,
    {'function'       => $forcestudent,     {'function'       => $forcestudent,
Line 261  sub handler { Line 259  sub handler {
                      $syllabus{'uploaded.domain'});                       $syllabus{'uploaded.domain'});
        if ($target ne 'tex') {         if ($target ne 'tex') {
    $r->print('<table><tr><td>'.&mt('Last updated').':</td><td>'.     $r->print('<table><tr><td>'.&mt('Last updated').':</td><td>'.
      $lastmod.'</td><td>'.&mt('by').' '.$who.       $lastmod.'</td><td>'.
        ($who ? &mt('by').' '.$who
                              : '' ).
      '</td></tr></table><p>');       '</td></tr></table><p>');
        } else {         } else {
    $r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '.&mt('by').'\\\\ '.     $r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '.
      &Apache::loncommon::plainname($syllabus{'uploaded.name'},       ($who? &mt('by').'\\\\ '.
                      $syllabus{'uploaded.domain'}).'\\\\');              &Apache::loncommon::plainname($syllabus{'uploaded.name'},$syllabus{'uploaded.domain'})
             :'')
        .'\\\\');
        }         }
        if ($allowed) {         if ($allowed) {
    $r->print('<form method="post">'.     $r->print('<form method="post">'.
Line 324  sub handler { Line 326  sub handler {
        if ($allowed) {         if ($allowed) {
    $r->print('<br /><textarea cols="80" rows="12" name="'.$field.'" id="'.$field.'">'.     $r->print('<br /><textarea cols="80" rows="12" name="'.$field.'" id="'.$field.'">'.
      &HTML::Entities::encode($syllabus{$field},'"&<>').       &HTML::Entities::encode($syllabus{$field},'"&<>').
      '</textarea> <input type="submit" name="storesyl" value="Store" />');       '</textarea> <input type="submit" name="storesyl" value="Save" />');
        }         }
    }     }
        }         }
Removed from v.1.58  
changed lines
  Added in v.1.61

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