projects
/
BackupPC.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Various changes, including changes in 2.1.1 and 2.1.2 releases.
[BackupPC.git]
/
bin
/
BackupPC_tarCreate
diff --git
a/bin/BackupPC_tarCreate
b/bin/BackupPC_tarCreate
index
071de33
..
ce67747
100755
(executable)
--- a/
bin/BackupPC_tarCreate
+++ b/
bin/BackupPC_tarCreate
@@
-227,7
+227,7
@@
sub archiveWrite
#
sub archiveWriteHardLinks
{
#
sub archiveWriteHardLinks
{
- my
$fh
= @_;
+ my
($fh)
= @_;
foreach my $hdr ( @HardLinks ) {
$hdr->{size} = 0;
my $name = $hdr->{linkname};
foreach my $hdr ( @HardLinks ) {
$hdr->{size} = 0;
my $name = $hdr->{linkname};
@@
-483,6
+483,7
@@
sub TarWriteFile
$done = 1;
} else {
foreach my $arg ( @ARGV ) {
$done = 1;
} else {
foreach my $arg ( @ARGV ) {
+ $arg = "/" if ( $arg eq "." );
$arg =~ s{^\./+}{/};
$arg =~ s{/+$}{};
$done = 1 if ( $name eq $arg || $name =~ /^\Q$arg\// );
$arg =~ s{^\./+}{/};
$arg =~ s{/+$}{};
$done = 1 if ( $name eq $arg || $name =~ /^\Q$arg\// );
@@
-504,7
+505,7
@@
sub TarWriteFile
my $name = $hdr->{linkname};
$name =~ s{^\./}{/};
$HardLinkExtraFiles{$name} = $hdr->{name};
my $name = $hdr->{linkname};
$name =~ s{^\./}{/};
$HardLinkExtraFiles{$name} = $hdr->{name};
- archiveWrite($fh, $
hdr->{linkname}
, $hdr->{name});
+ archiveWrite($fh, $
name
, $hdr->{name});
}
} elsif ( $hdr->{type} == BPC_FTYPE_SYMLINK ) {
#
}
} elsif ( $hdr->{type} == BPC_FTYPE_SYMLINK ) {
#