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

Diff for /loncom/interface/domainstatus.pm between versions 1.5 and 1.8

version 1.5, 2013/02/02 00:22:51 version 1.8, 2016/07/25 19:50:30
Line 78  sub handler { Line 78  sub handler {
   
     if (keys(%candisplay) > 0) {      if (keys(%candisplay) > 0) {
         $r->print('<h2>'.&mt('Server Utilities for Domain: [_1]','<i>'.$domdesc.'</i>').          $r->print('<h2>'.&mt('Server Utilities for Domain: [_1]','<i>'.$domdesc.'</i>').
                   '</h2>'.&print_status_menu(\%candisplay));                    '</h2>'.&print_status_menu(\%candisplay,$dom));
     } else {      } else {
         $r->print(          $r->print(
             '<h2>'.&mt('No information available').'</h2>'              '<h2>'.&mt('No information available').'</h2>'
Line 93  sub handler { Line 93  sub handler {
 }  }
   
 sub print_status_menu {  sub print_status_menu {
     my ($candisplay) = @_;      my ($candisplay,$dom) = @_;
     return '' if (ref($candisplay) ne 'HASH');      return '' if (ref($candisplay) ne 'HASH');
     return &Apache::lonhtmlcommon::generate_menu(      return &Apache::lonhtmlcommon::generate_menu(
                &servermenu_items($candisplay));                 &servermenu_items($candisplay,$dom));
 }  }
   
 sub servermenu_items {  sub servermenu_items {
     my ($candisplay) = @_;      my ($candisplay,$dom) = @_;
     my $titles = &LONCAPA::lonauthcgi::serverstatus_titles();      my $titles = &LONCAPA::lonauthcgi::serverstatus_titles();
     my $linknames = &serverstatus_links();      my $linknames = &serverstatus_links();
     my @menu;      my @menu;
Line 145  sub servermenu_items { Line 145  sub servermenu_items {
                  linktitle => $titles->{'clusterstatus'},                   linktitle => $titles->{'clusterstatus'},
              },               },
              {               {
                    linktext => $linknames->{'certstatus'},
                    icon => '',
                    alttext => '',
                    #help => 'Domain_Coordination_Apache_Status',
                    url => '/cgi-bin/loncertstatus.pl',
                    permission => $candisplay->{'certstatus'},
                    linktitle => $titles->{'certstatus'},
                },
                {
                  linktext => $linknames->{'codeversions'},                   linktext => $linknames->{'codeversions'},
                  icon => '',                   icon => '',
                  alttext => '',                   alttext => '',
Line 163  sub servermenu_items { Line 172  sub servermenu_items {
                  linktitle => $titles->{'checksums'},                   linktitle => $titles->{'checksums'},
              },               },
              {               {
                    linktext => $linknames->{'diskusage'},
                    icon => '',
                    alttext => '',
                    #help => 'Domain_Coordination_Disk_Usage',
                    url => '/cgi-bin/quotacheck.pl?domain='.$dom,
                    permission => $candisplay->{'diskusage'},
                    linktitle => $titles->{'diskusage'},
                },
                {
                    linktext => $linknames->{'uniquecodes'},
                    icon => '',
                    alttext => '',
                    #help => 'Domain_Coordination_Uniquecodes',
                    url => '/cgi-bin/listcodes.pl?domain='.$dom.'&amp;format=html',
                    permission => $candisplay->{'uniquecodes'},
                    linktitle => $titles->{'uniquecodes'},
                },
                {
                  linktext => $linknames->{'showenv'},                   linktext => $linknames->{'showenv'},
                  icon => '',                   icon => '',
                  alttext => '',                   alttext => '',
Line 231  sub serverstatus_links { Line 258  sub serverstatus_links {
                     'lonstatus' => 'Connection Status',                      'lonstatus' => 'Connection Status',
                     'server-status' => 'Apache Server Status',                      'server-status' => 'Apache Server Status',
                     'clusterstatus' => 'Domain Status',                      'clusterstatus' => 'Domain Status',
                       'certstatus' => 'LON-CAPA SSL Certificates Status',   
                     'codeversions' => 'LON-CAPA Modules',                      'codeversions' => 'LON-CAPA Modules',
                     'checksums'    => 'Check for LON-CAPA Module changes',                         'checksums'    => 'Check for LON-CAPA Module changes',   
                       'diskusage'    => 'Display quotas and usage for Course/Community Content',
                     'showenv' => 'User Environment for current log-in',                      'showenv' => 'User Environment for current log-in',
                     'loncron' => 'Update Connections and Refresh Status Information',                      'loncron' => 'Update Connections and Refresh Status Information',
                       'uniquecodes' => "List Domain's Courses with Assigned Six Character codes",
                     'takeoffline' => 'Replace log-in page with offline notice',                      'takeoffline' => 'Replace log-in page with offline notice',
                     'takeonline' => 'Replace offline notice with log-in page',                      'takeonline' => 'Replace offline notice with log-in page',
                     'metadata_keywords' => 'Display Metadata Keywords',                      'metadata_keywords' => 'Display Metadata Keywords',
Removed from v.1.5  
changed lines
  Added in v.1.8

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