Diff for /loncom/interface/lonsyllabus.pm between versions 1.57 and 1.60

version 1.57, 2007/03/02 23:17:58 version 1.60, 2007/07/27 00:17:17
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 120  sub handler { Line 119  sub handler {
  $env{'form.register'},});   $env{'form.register'},});
   
  $r->print($start_page.'<h1>'.$courseenv{'description'}.'</h1><h3>'.   $r->print($start_page.'<h1>'.$courseenv{'description'}.'</h1><h3>'.
                  $Apache::lonnet::domaindescription{$cdom}.'</h3>');    &Apache::lonnet::domain($cdom,'description').'</h3>');
     } else {      } else {
  $r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'.   $r->print('\noindent{\large\textbf{'.$courseenv{'description'}.'}}\\\\\\\\\textbf{'.
                  $Apache::lonnet::domaindescription{$cdom}.'}\\\\');    &Apache::lonnet::domain($cdom,'description').'}\\\\');
     }      }
 # -------------------------------------------------------------- Announcements?  # -------------------------------------------------------------- Announcements?
     my $day = &Apache::lonannounce::showday(time,2,      my $day = &Apache::lonannounce::showday(time,2,
Line 324  sub handler { Line 323  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.57  
changed lines
  Added in v.1.60


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