change regex for $ret evaluation
This commit is contained in:
parent
4c9946a575
commit
db6c9525b2
@ -1,2 +1,2 @@
|
|||||||
UPD 2021-04-23_12:44:47 3363 FHEM/98_backup.pm
|
UPD 2021-04-23_12:44:47 3363 FHEM/98_backup.pm
|
||||||
UPD 2021-04-23_12:56:07 8869 lib/FHEM/Core/Utils/FHEMbackup.pm
|
UPD 2021-04-23_17:20:10 8871 lib/FHEM/Core/Utils/FHEMbackup.pm
|
||||||
|
@ -67,12 +67,12 @@ sub CommandBackup {
|
|||||||
$ret = addConfDBFiles( $configfile, $statefile );
|
$ret = addConfDBFiles( $configfile, $statefile );
|
||||||
return ::Log(1, qq(Backup ERROR - addConfDBFiles: $ret))
|
return ::Log(1, qq(Backup ERROR - addConfDBFiles: $ret))
|
||||||
if ( defined($ret)
|
if ( defined($ret)
|
||||||
&& $ret =~ m{\ACan\'t open.*}xms);
|
&& $ret =~ m{\ACan\'t\sopen.*}xms);
|
||||||
|
|
||||||
$ret = readModpath( $modpath, $backupdir );
|
$ret = readModpath( $modpath, $backupdir );
|
||||||
return ::Log(1, qq(Backup ERROR - readModpath: $ret))
|
return ::Log(1, qq(Backup ERROR - readModpath: $ret))
|
||||||
if ( defined($ret)
|
if ( defined($ret)
|
||||||
&& $ret =~ m{\ACan\'t open.*}xms);
|
&& $ret =~ m{\ACan\'t\sopen.*}xms);
|
||||||
|
|
||||||
## add all logfile path to pathname array
|
## add all logfile path to pathname array
|
||||||
$ret = addLogPathToPathnameArray();
|
$ret = addLogPathToPathnameArray();
|
||||||
|
Loading…
x
Reference in New Issue
Block a user