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

Diff for /loncom/interface/lonsyllabus.pm between versions 1.91 and 1.93

version 1.91, 2009/05/19 10:07:54 version 1.93, 2009/06/11 16:48:33
Line 162  ENDSCRIPT Line 162  ENDSCRIPT
                 text=>"Course syllabus"});                  text=>"Course syllabus"});
             $r->print(&Apache::lonhtmlcommon::breadcrumbs());              $r->print(&Apache::lonhtmlcommon::breadcrumbs());
         }          }
   
     }      }
 # ---------------------------------------------------------- Load syllabus info  # ---------------------------------------------------------- Load syllabus info
     my %syllabus=&Apache::lonnet::dump('syllabus',$cdom,$cnum);      my %syllabus=&Apache::lonnet::dump('syllabus',$cdom,$cnum);
Line 230  ENDSCRIPT Line 229  ENDSCRIPT
         }          }
     }      }
   
   #--------Functions
   if( $allowed || $privileged) {
       my $functions=&Apache::lonhtmlcommon::start_funclist();
       if ($allowed) {
           $functions.=&Apache::lonhtmlcommon::add_item_funclist(
                           '<a href="'.$r->uri.'?forcestudent=1">'
                          .&mt('Show Public View').'</a>'
                          .&Apache::loncommon::help_open_topic(
                               'Uploaded_Templates_PublicView'));
           } elsif ($privileged) {
               $functions.=&Apache::lonhtmlcommon::add_item_funclist(
                               '<a href="'.$r->uri.'?forceedit=1">'
                              .&mt('Edit').'</a>');
           }
           $functions.=&Apache::lonhtmlcommon::end_funclist();
           $r->print(&Apache::loncommon::head_subbox($functions));
       }
   
 #---------------------Print External URL Syllabus Info  #---------------------Print External URL Syllabus Info
     if( ($allowed) && ($target ne 'tex') ) {      if( ($allowed) && ($target ne 'tex') ) {
         my $protocol = $Apache::lonnet::protocol{$homeserver};          my $protocol = $Apache::lonnet::protocol{$homeserver};
Line 273  ENDSCRIPT Line 290  ENDSCRIPT
                   :'')                    :'')
              .'\\\\');               .'\\\\');
     }      }
 #--------Functions  
     if ($target ne 'tex') {  
         if( $allowed || $privileged) {  
             $r->print(&Apache::lontemplate::start_functionslist());  
         if ($allowed) {  
             $r->print(&Apache::lontemplate::item_functionslist(  
                         '<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Public View').'</a>'  
                        .&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')));  
         } elsif ($privileged) {  
             $r->print(&Apache::lontemplate::item_functionslist(  
                         '<a href="'.$r->uri.'?forceedit=1">'.&mt('Edit').'</a>'));  
         }  
             $r->print(&Apache::lontemplate::end_functionslist());  
         }  
     }  
 #----------------------------Print Headtitle  #----------------------------Print Headtitle
     if ($target ne 'tex') {      if ($target ne 'tex') {
         $r->print('<h1>'.$courseenv{'description'}.'</h1>');          $r->print('<h1>'.$courseenv{'description'}.'</h1>');
Line 344  ENDSCRIPT Line 346  ENDSCRIPT
              &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_Box');
             $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_Box');
             $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 407  ENDSCRIPT Line 409  ENDSCRIPT
                         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_Box');
                     } else {                      } else {
                         $r->print('\\\\\textbf{'.$syllabusfields{$field}.'}\\\\'.                          $r->print('\\\\\textbf{'.$syllabusfields{$field}.'}\\\\'.
                         &Apache::lonxml::xmlparse($r,'tex',$message).'\\\\');                          &Apache::lonxml::xmlparse($r,'tex',$message).'\\\\');
Removed from v.1.91  
changed lines
  Added in v.1.93

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