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

Diff for /loncom/interface/lonsimplepage.pm between versions 1.72 and 1.76

version 1.72, 2009/02/25 13:25:52 version 1.76, 2009/03/27 13:50:36
Line 253  sub handler { Line 253  sub handler {
  &Apache::lonnet::put($db_name,\%syllabus,$dom,$crs);   &Apache::lonnet::put($db_name,\%syllabus,$dom,$crs);
     }      }
   
   #---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 Function  #---Print Function
  if ($target ne 'tex') {   if ($target ne 'tex') {
  if($allowed || $privileged){   if($allowed || $privileged){
  &Apache::lontemplate::print_start_page_functions($r);   &Apache::lontemplate::start_functionslist($r);
  if($allowed){   if($allowed){
  &Apache::lontemplate::print_functions_content($r,'<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Student View').'</a>'.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView'));         &Apache::lontemplate::item_functionslist($r,'<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Student View').'</a>'.&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView'));      
  &Apache::lontemplate::print_functions_content($r,&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));   
  }elsif($privileged){   }elsif($privileged){
  my $edittext = &mt('Edit');   my $edittext = &mt('Edit');
         if ($group ne '') {          if ($group ne '') {
             $edittext = &mt('Edit Group Homepage');              $edittext = &mt('Edit Group Homepage');
         }          }
  &Apache::lontemplate::print_functions_content($r,'<a href="'.$r->uri.'?forceedit=edit'.$refarg.'">'.$edittext.'</a>');   &Apache::lontemplate::item_functionslist($r,'<a href="'.$r->uri.'?forceedit=edit'.$refarg.'">'.$edittext.'</a>');
         if ($group ne '') {          if ($group ne '') {
             if ($group_edit_perm) {              if ($group_edit_perm) {
                 &Apache::lontemplate::print_functions_content($r,'&nbsp;&nbsp;&nbsp;'.                  &Apache::lontemplate::item_functionslist($r,'&nbsp;&nbsp;&nbsp;'.
                 '<a href="/adm/coursegroups?action=modify&amp;refpage=grouplist'.                  '<a href="/adm/coursegroups?action=modify&amp;refpage=grouplist'.
                 '&amp;state=pick_task&amp;groupname='.$group.'">'.                  '&amp;state=pick_task&amp;groupname='.$group.'">'.
                 &mt('Edit Group Settings').'</a>');                  &mt('Edit Group Settings').'</a>');
             }              }
       }            }    
  }   }
  &Apache::lontemplate::print_end_page_functions($r);   &Apache::lontemplate::end_functionslist($r);
  }   }
   }    }
   
Line 334  sub handler { Line 339  sub handler {
  if($allowed){   if($allowed){
  $r->print('<p>');   $r->print('<p>');
  }   }
  $r->print('<div class="LC_ContentBoxSpecial">');                          $r->print('<h2>'.$message.'</h2>');
                         $r->print('<h2 class="LC_hcell">'.$message.'</h2>');  
  $r->print('<blockquote>');  
                     } else {                      } else {
                         my $safeinit;                          my $safeinit;
                         $r->print(&Apache::lonxml::xmlparse($r,'tex','<h1>'.$message.'</h1>'));                          $r->print(&Apache::lonxml::xmlparse($r,'tex','<h1>'.$message.'</h1>'));
Line 387  sub handler { Line 390  sub handler {
     $r->print('<p>'.&mt('No page information provided.').'</p>');      $r->print('<p>'.&mt('No page information provided.').'</p>');
         }          }
     }      }
       
     $r->print('</blockquote>');  
     $r->print('</div>');  
     if ($env{'form.grade_target'} ne 'tex') {      if ($env{'form.grade_target'} ne 'tex') {
  $r->print(&Apache::loncommon::end_page());   $r->print(&Apache::loncommon::end_page());
     } else {      } else {
Line 416  sub display_group_links { Line 416  sub display_group_links {
                         href => "javascript:group_chat('$group')",                          href => "javascript:group_chat('$group')",
                       );                        );
     %{$menu{'files'}} = (      %{$menu{'files'}} = (
                         text => 'File Repository',                          text => 'Group Portfolio',
                         href => '/adm/coursegrp_portfolio?group='.$group.                          href => '/adm/coursegrp_portfolio?group='.$group.
                                 $refarg,                                  $refarg,
                       );                        );
Removed from v.1.72  
changed lines
  Added in v.1.76

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