[otrs-cvs] otrs/Kernel/System/Log File.pm,1.15,1.16
CVS commits notifications of OTRS.org
cvs-log at otrs.org
Fri Apr 25 13:15:23 GMT 2008
Comments:
Update of /home/cvs/otrs/Kernel/System/Log
In directory lancelot:/tmp/cvs-serv11732/Log
Modified Files:
File.pm
Log Message:
Replaced OTRS GmbH with OTRS AG. Simplify the code for a better readability.
Author: tr
Index: File.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/Log/File.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
*** File.pm 2 Oct 2007 10:38:08 -0000 1.15
--- File.pm 25 Apr 2008 13:15:18 -0000 1.16
***************
*** 1,5 ****
# --
# Kernel/System/Log/File.pm - file log backend
! # Copyright (C) 2001-2007 OTRS GmbH, http://otrs.org/
# --
# $Id$
--- 1,5 ----
# --
# Kernel/System/Log/File.pm - file log backend
! # 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.
# --
***************
*** 42,46 ****
# Bind stderr to log file, because iis do print stderr to web page.
if ( $ENV{SERVER_SOFTWARE} && $ENV{SERVER_SOFTWARE} =~ /^microsoft\-iis/i ) {
! if ( !open( STDERR, ">>", $Self->{LogFile} . ".error" ) ) {
print STDERR "ERROR: Can't write $Self->{LogFile}.error: $!";
}
--- 42,46 ----
# Bind stderr to log file, because iis do print stderr to web page.
if ( $ENV{SERVER_SOFTWARE} && $ENV{SERVER_SOFTWARE} =~ /^microsoft\-iis/i ) {
! if ( !open STDERR, '>>', $Self->{LogFile} . ".error" ) {
print STDERR "ERROR: Can't write $Self->{LogFile}.error: $!";
}
***************
*** 56,60 ****
# open logfile
! if ( open( $FH, ">>", $Self->{LogFile} ) ) {
print $FH "[" . localtime() . "]";
if ( $Param{Priority} =~ /debug/i ) {
--- 56,60 ----
# open logfile
! if ( open $FH, '>>', $Self->{LogFile} ) {
print $FH "[" . localtime() . "]";
if ( $Param{Priority} =~ /debug/i ) {
***************
*** 84,98 ****
# close file handle
! close($FH);
return 1;
}
- else {
! # print error screen
! print STDERR "\n";
! print STDERR " >> Can't write $Self->{LogFile}: $! <<\n";
! print STDERR "\n";
! return;
! }
}
--- 84,96 ----
# close file handle
! close $FH;
return 1;
}
! # print error screen
! print STDERR "\n";
! print STDERR " >> Can't write $Self->{LogFile}: $! <<\n";
! print STDERR "\n";
! return;
}
More information about the cvs-log
mailing list