test logFile before doing regexps on it
This commit is contained in:
parent
77b4dd6b35
commit
323c171a27
|
@ -490,7 +490,7 @@ sub closeSyslog {
|
|||
sub logFile {
|
||||
my $this = shift;
|
||||
my $logFile = shift;
|
||||
if ( $logFile =~ /^(.+)\+$/ ) {
|
||||
if ( $logFile and ( $logFile =~ /^(.+)\+$/ ) ) {
|
||||
$this->{logFile} = $1.'.'.$$;
|
||||
} else {
|
||||
$this->{logFile} = $logFile;
|
||||
|
|
Loading…
Reference in New Issue