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

Diff for /loncom/interface/lonsyllabus.pm between versions 1.88 and 1.89

version 1.88, 2009/04/28 14:43:06 version 1.89, 2009/05/11 13:34:10
Line 248  if( ($allowed) && ($target ne 'tex') ) { Line 248  if( ($allowed) && ($target ne 'tex') ) {
   
 #-Print Help Text  #-Print Help Text
 if ($target ne 'tex') {  if ($target ne 'tex') {
  if($allowed){   if ($allowed) {
  $r->print(&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));   $r->print(&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));
  }   }
 }  }
Line 263  if ($target ne 'tex') { Line 263  if ($target ne 'tex') {
    $r->print('<div class="LC_info">'.&mt('Last updated').': '.     $r->print('<div class="LC_info">'.&mt('Last updated').': '.
      $lastmod . ' '.       $lastmod . ' '.
      ($who ? &mt('by').' '.$who       ($who ? &mt('by').' '.$who
                            : '' ) .                              : '' ) .
              '</div>' );               '</div>' );
        
        } else {         } else {
    $r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '.     $r->print('\\\\ '.&mt('Last updated').': '.$lastmod.' '.
      ($who? &mt('by').'\\\\ '.       ($who? &mt('by').'\\\\ '.
Line 275  if ($target ne 'tex') { Line 275  if ($target ne 'tex') {
        }         }
 #--------Functions  #--------Functions
 if ($target ne 'tex') {  if ($target ne 'tex') {
  if($allowed || $privileged){   if( $allowed || $privileged) {
                 $r->print(&Apache::lontemplate::start_functionslist());                  $r->print(&Apache::lontemplate::start_functionslist());
  if($allowed){   if ($allowed) {
                     $r->print(&Apache::lontemplate::item_functionslist(                      $r->print(&Apache::lontemplate::item_functionslist(
                         '<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Public View').'</a>'                          '<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Public View').'</a>'
                        .&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')));                         .&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')));
  }elsif($privileged){   } elsif ($privileged) {
                     $r->print(&Apache::lontemplate::item_functionslist(                      $r->print(&Apache::lontemplate::item_functionslist(
                         '<a href="'.$r->uri.'?forceedit=1">'.&mt('Edit').'</a>'));                          '<a href="'.$r->uri.'?forceedit=1">'.&mt('Edit').'</a>'));
  }   }
Line 289  if ($target ne 'tex') { Line 289  if ($target ne 'tex') {
  }   }
  }   }
 #----------------------------Print Headtitle  #----------------------------Print Headtitle
 if($target ne 'tex'){  if ($target ne 'tex') {
  $r->print('<h1>'.$courseenv{'description'}.'</h1>');   $r->print('<h1>'.$courseenv{'description'}.'</h1>');
  $r->print('<h3>'.  &Apache::lonnet::domain($cdom,'description').'</h3>');   $r->print('<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::domain($cdom,'description').'}\\\\');   &Apache::lonnet::domain($cdom,'description').'}\\\\');
 }  }
Line 343  if($target ne 'tex'){ Line 343  if($target ne 'tex'){
     my $day = &Apache::lonannounce::showday(time,2,      my $day = &Apache::lonannounce::showday(time,2,
  &Apache::lonannounce::readcalendar($cdom.'_'.$cnum));   &Apache::lonannounce::readcalendar($cdom.'_'.$cnum));
     if ($target ne 'tex') {      if ($target ne 'tex') {
  if($allowed){   if ($allowed) {
  &Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial');   &Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial');
  $r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit));   $r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit));
  my $editurl= &Apache::lonnet::absolute_url().'/adm/'.$cdom.'/'.$cnum.'/_rss.html';   my $editurl= &Apache::lonnet::absolute_url().'/adm/'.$cdom.'/'.$cnum.'/_rss.html';
         $r->print( '<a href="'.$editurl.'">'.&mt('New RSS Feed or Blog').'</a>');          $r->print( '<a href="'.$editurl.'">'.&mt('New RSS Feed or Blog').'</a>');
  &Apache::lontemplate::print_end_template($r);   &Apache::lontemplate::print_end_template($r);
  }   } elsif (&Apache::lonrss::advertisefeeds($cnum,$cdom) ne '') {
  elsif(&Apache::lonrss::advertisefeeds($cnum,$cdom) ne ''){  
  &Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial');   &Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial');
  $r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit));   $r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit));
  &Apache::lontemplate::print_end_template($r);   &Apache::lontemplate::print_end_template($r);
Line 383  if($target ne 'tex'){ Line 382  if($target ne 'tex'){
        } elsif ($embstyle eq 'img') {# embed as an image         } elsif ($embstyle eq 'img') {# embed as an image
    $output='<img src="'.$filelink.'" />';     $output='<img src="'.$filelink.'" />';
        }         }
        if($output ne ''){         if ($output ne '') {
        if ($target ne 'tex') {         if ($target ne 'tex') {
    $message.='<p>'.$output.'</p>';     $message.='<p>'.$output.'</p>';
        } else {         } else {
Line 405  if($target ne 'tex'){ Line 404  if($target ne 'tex'){
    }     }
    $message=&Apache::lontexconvert::msgtexconverted($message);     $message=&Apache::lontexconvert::msgtexconverted($message);
    if ($target ne 'tex') {     if ($target ne 'tex') {
  if($allowed){   if ($allowed) {
  $r->print('<p>');   $r->print('<p>');
  }   }
  &Apache::lontemplate::print_template($r, $syllabusfields{$field}, $message,$allowed,'LC_ContentBoxSpecial');   &Apache::lontemplate::print_template($r, $syllabusfields{$field}, $message,$allowed,'LC_ContentBoxSpecial');
Line 416  if($target ne 'tex'){ Line 415  if($target ne 'tex'){
    push(@htmlids,$field);     push(@htmlids,$field);
        }         }
        if ($allowed) {         if ($allowed) {
  if($target ne 'tex'){   if ($target ne 'tex') {
  $r->print('</p>');   $r->print('</p>');
  &Apache::lontemplate::print_editbox_template($r, $syllabus{$field}, $field);   &Apache::lontemplate::print_editbox_template($r, $syllabus{$field}, $field);
  }   }
Removed from v.1.88  
changed lines
  Added in v.1.89

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