projects
/
BackupPC.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
- fixed configure.pl and makeDist.
[BackupPC.git]
/
bin
/
BackupPC_tarPCCopy
diff --git
a/bin/BackupPC_tarPCCopy
b/bin/BackupPC_tarPCCopy
index
efb96a8
..
a7b0e7a
100755
(executable)
--- a/
bin/BackupPC_tarPCCopy
+++ b/
bin/BackupPC_tarPCCopy
@@
-460,11
+460,12
@@
sub TarWriteFile
}
$f->close();
my $md5 = Digest::MD5->new;
}
$f->close();
my $md5 = Digest::MD5->new;
+ my $len = length($dataMD5);
+ $hdr->{realSize} = $len if ( $hdr->{type} != BPC_FTYPE_FILE );
if ( $hdr->{realSize} < 1048576
&& length($dataMD5) != $hdr->{realSize} ) {
if ( $hdr->{realSize} < 1048576
&& length($dataMD5) != $hdr->{realSize} ) {
- printf(STDERR "File $hdr->{fullPath} has bad size"
- . " (expect $hdr->{realSize}, got %d)\n",
- length($dataMD5));
+ print(STDERR "File $hdr->{fullPath} has bad size"
+ . " (expect $hdr->{realSize}, got $len)\n");
} else {
my $digest = $bpc->Buffer2MD5($md5, $hdr->{realSize},
\$dataMD5);
} else {
my $digest = $bpc->Buffer2MD5($md5, $hdr->{realSize},
\$dataMD5);