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

Diff for /loncom/interface/lonsimplepage.pm between versions 1.73 and 1.77

version 1.73, 2009/02/25 23:27:21 version 1.77, 2009/03/27 15:46:38
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);                          $r->print(&Apache::lontemplate::start_functionslist());
  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'));                                        $r->print(&Apache::lontemplate::item_functionslist(
  &Apache::lontemplate::print_functions_content($r,&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes',&mt('Help with filling in text boxes')));                                       '<a href="'.$r->uri.'?forcestudent=1">'.&mt('Show Student View').'</a>'
                                      .&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView')));
  }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>');                                  $r->print(&Apache::lontemplate::item_functionslist(
                                       '<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;'.                                                  $r->print(&Apache::lontemplate::item_functionslist(
                 '<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);                          $r->print(&Apache::lontemplate::end_functionslist());
  }   }
   }    }
   
Line 411  sub display_group_links { Line 419  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.73  
changed lines
  Added in v.1.77

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