[otrs-cvs] Support/Kernel/System/Support/Database mssql.pm, 1.6, 1.7

[CVS commits notifications of OTRS.org]

Comments:
Update of /home/cvs/Support/Kernel/System/Support/Database
In directory lancelot:/tmp/cvs-serv15245/Kernel/System/Support/Database

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

Author: martin

Index: mssql.pm
===================================================================
RCS file: /home/cvs/Support/Kernel/System/Support/Database/mssql.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** mssql.pm	22 Nov 2007 15:15:26 -0000	1.6
--- mssql.pm	1 May 2008 16:52:35 -0000	1.7
***************
*** 1,5 ****
  # --
  # Kernel/System/Support/Database/mssql.pm - all required system informations
! # Copyright (C) 2001-2007 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
--- 1,5 ----
  # --
  # Kernel/System/Support/Database/mssql.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.
  # --
  
***************
*** 58,63 ****
      }
      if ( ref( $Param{ModuleInputHash} ) ne 'HASH' ) {
!         $Self->{LogObject}
!             ->Log( Priority => 'error', Message => "ModuleInputHash must be a hash reference!" );
          return;
      }
--- 58,65 ----
      }
      if ( ref( $Param{ModuleInputHash} ) ne 'HASH' ) {
!         $Self->{LogObject}->Log(
!             Priority => 'error',
!             Message  => 'ModuleInputHash must be a hash reference!',
!         );
          return;
      }
***************
*** 116,120 ****
  
      # table check
!     my $File = $Self->{ConfigObject}->Get('Home') . "/scripts/database/otrs-schema.xml";
      if ( -f $File ) {
          my $Count   = 0;
--- 118,122 ----
  
      # table check
!     my $File = $Self->{ConfigObject}->Get('Home') . '/scripts/database/otrs-schema.xml';
      if ( -f $File ) {
          my $Count   = 0;
***************
*** 123,127 ****
          my $Content = '';
          my $In;
!         if ( open( $In, '<', "$File" ) ) {
              while (<$In>) {
                  $Content .= $_;
--- 125,129 ----
          my $Content = '';
          my $In;
!         if ( open( $In, '<', $File) ) {
              while (<$In>) {
                  $Content .= $_;
***************
*** 135,140 ****
                      }
                      $Count++;
!                     if ( $Self->{DBObject}
!                         ->Prepare( SQL => "select * from $Table->{Name}", Limit => 1 ) )
                      {
                          while ( my @Row = $Self->{DBObject}->FetchrowArray() ) {
--- 137,141 ----
                      }
                      $Count++;
!                     if ( $Self->{DBObject}->Prepare( SQL => "select * from $Table->{Name}", Limit => 1 ) )
                      {
                          while ( my @Row = $Self->{DBObject}->FetchrowArray() ) {
***************
*** 156,164 ****
                  Key         => 'Table',
                  Name        => 'Table',
!                 Description => "Check existing framework tables.",
                  Comment     => $Message,
                  Check       => $Check,
!                 },
!                 ;
          }
          else {
--- 157,164 ----
                  Key         => 'Table',
                  Name        => 'Table',
!                 Description => 'Check existing framework tables.',
                  Comment     => $Message,
                  Check       => $Check,
!             };
          }
          else {
***************
*** 166,174 ****
                  Key         => 'Table',
                  Name        => 'Table',
!                 Description => "Check existing framework tables.",
                  Comment     => "Can't open file $File: $!",
                  Check       => $Check,
!                 },
!                 ;
          }
      }
--- 166,173 ----
                  Key         => 'Table',
                  Name        => 'Table',
!                 Description => 'Check existing framework tables.',
                  Comment     => "Can't open file $File: $!",
                  Check       => $Check,
!             };
          }
      }
***************
*** 177,185 ****
              Key         => 'Table',
              Name        => 'Table',
!             Description => "Check existing framework tables.",
              Comment     => "Can't find file $File!",
              Check       => 'Failed',
!             },
!             ;
      }
      return $Data;
--- 176,183 ----
              Key         => 'Table',
              Name        => 'Table',
!             Description => 'Check existing framework tables.',
              Comment     => "Can't find file $File!",
              Check       => 'Failed',
!         };
      }
      return $Data;