[otrs-cvs] Support/Kernel/System/Support/Webserver Apache.pm, 1.7, 1.8

[CVS commits notifications of OTRS.org]

Comments:
Update of /home/cvs/Support/Kernel/System/Support/Webserver
In directory lancelot:/tmp/cvs-serv15646/Kernel/System/Support/Webserver

Modified Files:
	Apache.pm 
Log Message:
Improved descriptions.

Author: martin

Index: Apache.pm
===================================================================
RCS file: /home/cvs/Support/Kernel/System/Support/Webserver/Apache.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** Apache.pm	21 Dec 2007 11:01:46 -0000	1.7
--- Apache.pm	1 May 2008 16:54:57 -0000	1.8
***************
*** 1,5 ****
  # --
  # Kernel/System/Support/Webserver/Apache.pm - all required system informations
! # Copyright (C) 2001-2007 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
--- 1,5 ----
  # --
  # Kernel/System/Support/Webserver/Apache.pm - all required system informations
! # Copyright (C) 2001-2008 OTRS AG, http://otrs.org/
  # --
  # $Id$
***************
*** 7,11 ****
  # This software comes with ABSOLUTELY NO WARRANTY. For details, see
  # the enclosed file COPYING for license information (GPL). If you
! # did not receive this file, see http://www.gnu.org/licenses/gpl.txt.
  # --
  
--- 7,11 ----
  # This software comes with ABSOLUTELY NO WARRANTY. For details, see
  # the enclosed file COPYING for license information (GPL). If you
! # did not receive this file, see http://www.gnu.org/licenses/gpl-2.0.txt.
  # --
  
***************
*** 54,59 ****
      }
      if ( ref( $Param{ModuleInputHash} ) ne 'HASH' ) {
!         $Self->{LogObject}
!             ->Log( Priority => 'error', Message => "ModuleInputHash must be a hash reference!" );
          return;
      }
--- 54,61 ----
      }
      if ( ref( $Param{ModuleInputHash} ) ne 'HASH' ) {
!         $Self->{LogObject}->Log(
!             Priority => 'error',
!             Message  => 'ModuleInputHash must be a hash reference!',
!         );
          return;
      }
***************
*** 126,144 ****
      if ( !$ApacheDBI ) {
          $Check = 'Critical';
!         $Message
!             = 'Apache::DBI should be used to get a better performance (pre establish database connections).';
      }
      else {
          $Check   = 'OK';
!         $Message = "$ApacheDBI";
      }
      $Data = {
          Key         => 'Apache::DBI',
          Name        => 'Apache::DBI',
!         Description => "Check used Apache::DBI.",
          Comment     => $Message,
          Check       => $Check,
!         },
!         return $Data;
  }
  
--- 128,145 ----
      if ( !$ApacheDBI ) {
          $Check = 'Critical';
!         $Message = 'Apache::DBI should be used to get a better performance (pre establish database connections).';
      }
      else {
          $Check   = 'OK';
!         $Message = $ApacheDBI;
      }
      $Data = {
          Key         => 'Apache::DBI',
          Name        => 'Apache::DBI',
!         Description => 'Check used Apache::DBI.',
          Comment     => $Message,
          Check       => $Check,
!     };
!     return $Data;
  }
  
***************
*** 167,176 ****
                  if ( !$ApacheReload ) {
                      $Check = 'Critical';
!                     $Message
!                         = 'Apache::Reload or Apache2::Reload should be used as PerlModule and PerlInitHandler in Apache config file.';
                  }
                  else {
                      $Check   = 'OK';
!                     $Message = "$ApacheReload";
                  }
              }
--- 168,176 ----
                  if ( !$ApacheReload ) {
                      $Check = 'Critical';
!                     $Message = 'Apache::Reload or Apache2::Reload should be used as PerlModule and PerlInitHandler in Apache config file.';
                  }
                  else {
                      $Check   = 'OK';
!                     $Message = $ApacheReload;
                  }
              }
***************
*** 184,192 ****
          Key         => 'Apache::Reload',
          Name        => 'Apache::Reload',
!         Description => "Check used Apache::Reload/Apache2::Reload.",
          Comment     => $Message,
          Check       => $Check,
!         },
!         return $Data;
  }
  
--- 184,192 ----
          Key         => 'Apache::Reload',
          Name        => 'Apache::Reload',
!         Description => 'Check used Apache::Reload/Apache2::Reload.',
          Comment     => $Message,
          Check       => $Check,
!     };
!     return $Data;
  }
  
***************
*** 202,207 ****
          if ( $ENV{MOD_PERL} =~ /\/1.99/ ) {
              $Check = 'Critical';
!             $Message
!                 = "You use a beta version of mod_perl ($ENV{MOD_PERL}), you should upgrade to a stable version.";
          }
          elsif ( $ENV{MOD_PERL} =~ /\/1/ ) {
--- 202,206 ----
          if ( $ENV{MOD_PERL} =~ /\/1.99/ ) {
              $Check = 'Critical';
!             $Message = "You use a beta version of mod_perl ($ENV{MOD_PERL}), you should upgrade to a stable version.";
          }
          elsif ( $ENV{MOD_PERL} =~ /\/1/ ) {
***************
*** 211,229 ****
          else {
              $Check   = 'OK';
!             $Message = "$ENV{MOD_PERL}";
          }
      }
      else {
          $Check   = 'Critical';
!         $Message = 'You should use mod_perl to increase your performance.';
      }
      $Data = {
          Key         => 'mod_perl version',
!         Name        => 'mod_perl version',
!         Description => "Check used mod_perl version.",
          Comment     => $Message,
          Check       => $Check,
!         },
!         return $Data;
  }
  
--- 210,228 ----
          else {
              $Check   = 'OK';
!             $Message = $ENV{MOD_PERL};
          }
      }
      else {
          $Check   = 'Critical';
!         $Message = 'You should use mod_perl to increase your performance (you really should do this).';
      }
      $Data = {
          Key         => 'mod_perl version',
!         Name        => 'Version (mod_perl)',
!         Description => 'Check used mod_perl version.',
          Comment     => $Message,
          Check       => $Check,
!     };
!     return $Data;
  }