Commit ebac439a authored by Nigel Kukard's avatar Nigel Kukard
Browse files

Cosmetic syntax fixups

parent d2298f0b
......@@ -380,6 +380,7 @@ if (checkPATH("pdlzip")) {
$config{'compress-lz'} = "plzip";
}
# Sanitize the source and dest
my $sourceDir = File::Spec->rel2abs($ARGV[0]);
my $destDir = File::Spec->rel2abs($ARGV[1]);
......@@ -923,8 +924,7 @@ sub backup
# exit 1;
}
}
# if (($doBackup{$path} & ST_DIR_SYS) != ST_DIR_SYS) {
} else {
} else { # if (($doBackup{$path} & ST_DIR_SYS) != ST_DIR_SYS) {
# Remove old files
removeBackups(
"$dest/$path",
......@@ -1089,6 +1089,7 @@ if (defined($optctl{'backup'})) {
}
# Restore function
sub restore
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment