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

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

version 1.93, 2009/06/11 16:48:33 version 1.94, 2009/09/02 12:39:26
Line 230  ENDSCRIPT Line 230  ENDSCRIPT
     }      }
   
 #--------Functions  #--------Functions
 if( $allowed || $privileged) {      if( ($allowed || $privileged) && $target ne 'tex') {
     my $functions=&Apache::lonhtmlcommon::start_funclist();          my $functions=&Apache::lonhtmlcommon::start_funclist();
     if ($allowed) {  
         $functions.=&Apache::lonhtmlcommon::add_item_funclist(          if ($allowed) {
                         '<a href="'.$r->uri.'?forcestudent=1">'              $functions.=&Apache::lonhtmlcommon::add_item_funclist(
                        .&mt('Show Public View').'</a>'                            '<a href="'.$r->uri.'?forcestudent=1">'
                        .&Apache::loncommon::help_open_topic(                             .&mt('Show Public View').'</a>'
                             'Uploaded_Templates_PublicView'));                             .&Apache::loncommon::help_open_topic(
                                   'Uploaded_Templates_PublicView'));
         } elsif ($privileged) {          } elsif ($privileged) {
             $functions.=&Apache::lonhtmlcommon::add_item_funclist(              $functions.=&Apache::lonhtmlcommon::add_item_funclist(
                             '<a href="'.$r->uri.'?forceedit=1">'                             '<a href="'.$r->uri.'?forceedit=1">'
                            .&mt('Edit').'</a>');                              .&mt('Edit').'</a>');
         }          }
   
         $functions.=&Apache::lonhtmlcommon::end_funclist();          $functions.=&Apache::lonhtmlcommon::end_funclist();
         $r->print(&Apache::loncommon::head_subbox($functions));          $r->print(&Apache::loncommon::head_subbox($functions));
     }      }
   
 #---------------------Print External URL Syllabus Info  #---------------------Print External URL Syllabus Info and Help Text
     if( ($allowed) && ($target ne 'tex') ) {      if( ($allowed) && ($target ne 'tex') ) {
         my $protocol = $Apache::lonnet::protocol{$homeserver};          my $protocol = $Apache::lonnet::protocol{$homeserver};
           $protocol = 'http' if ($protocol ne 'https');            $protocol = 'http' if ($protocol ne 'https');
Line 261  if( $allowed || $privileged) { Line 263  if( $allowed || $privileged) {
                      ,'<a href="/adm/parmset?action=crsenv">','</a>')                       ,'<a href="/adm/parmset?action=crsenv">','</a>')
                  .'</p>'                   .'</p>'
         );          );
           #-Print Help Text
           $r->print(&Apache::loncommon::help_open_topic( 
                           'Uploaded_Templates_TextBoxes',
                           &mt('Help with filling in text boxes')));
     }      }
   
 #-Print Help Text  
     if ($target ne 'tex') {  
         if ($allowed) {  
             $r->print(&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));  
         }  
     }  
 #----------Print last update  #----------Print last update
     my $lastmod=$syllabus{'uploaded.lastmodified'};      my $lastmod=$syllabus{'uploaded.lastmodified'};
     $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));      $lastmod=($lastmod?&Apache::lonlocal::locallocaltime($lastmod):&mt('never'));
Removed from v.1.93  
changed lines
  Added in v.1.94

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