mirror of
https://github.com/pgbackrest/pgbackrest.git
synced 2025-02-13 13:59:28 +02:00
Fix for logic that removes trailing spaces from code.
This commit is contained in:
parent
a050b76fa9
commit
22e126eda7
@ -470,7 +470,7 @@ sub pathSync
|
||||
my $strPath = shift;
|
||||
|
||||
logTrace(OP_FILE_PATH_SYNC, DEBUG_CALL, undef, {pathType => $strPathType, path => $strPath});
|
||||
|
||||
|
||||
filePathSync($self->path_get($strPathType, $strPath eq '.' ? undef : $strPath));
|
||||
}
|
||||
|
||||
@ -546,7 +546,7 @@ sub move
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
$self->pathSync($strDestinationPathType, dirname($strDestinationFile));
|
||||
}
|
||||
}
|
||||
|
@ -434,7 +434,7 @@ sub logDebug
|
||||
my $strMessage = shift;
|
||||
my $oParamHash = shift;
|
||||
my $strLevel = shift;
|
||||
|
||||
|
||||
$strLevel = defined($strLevel) ? $strLevel : DEBUG;
|
||||
|
||||
if ($oLogLevelRank{$strLevel}{rank} <= $oLogLevelRank{$strLogLevelConsole}{rank} ||
|
||||
@ -443,20 +443,20 @@ sub logDebug
|
||||
if (defined($oParamHash))
|
||||
{
|
||||
my $strParamSet;
|
||||
|
||||
|
||||
foreach my $strParam (sort(keys($oParamHash)))
|
||||
{
|
||||
if (defined($strParamSet))
|
||||
{
|
||||
$strParamSet .= ', ';
|
||||
}
|
||||
|
||||
|
||||
$strParamSet .= "${strParam} = " .
|
||||
(defined($$oParamHash{$strParam}) ?
|
||||
($strParam =~ /^is/ ? ($$oParamHash{$strParam} ? 'true' : 'false'):
|
||||
($strParam =~ /^is/ ? ($$oParamHash{$strParam} ? 'true' : 'false'):
|
||||
$$oParamHash{$strParam}) : '[undef]');
|
||||
}
|
||||
|
||||
|
||||
if (defined($strMessage))
|
||||
{
|
||||
$strMessage = "${strMessage}: ${strParamSet}";
|
||||
|
@ -810,7 +810,7 @@ sub BackRestTestCommon_Setup
|
||||
&log(WARN, "unit tests do not currently work with version 9.5");
|
||||
return false;
|
||||
}
|
||||
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
|
@ -224,7 +224,7 @@ if (!$bMatch)
|
||||
####################################################################################################################################
|
||||
my $hVersion;
|
||||
|
||||
if (-e './test.pl' && -e '../bin/pg_backrest.pl' && open($hVersion, '<', '../VERSION'))
|
||||
if (-e './test.pl' && -e '../bin/pg_backrest' && open($hVersion, '<', '../VERSION'))
|
||||
{
|
||||
my $strTestVersion = readline($hVersion);
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user