| Subject: | missing typeflag in AddLink |
| Date: | Thu, 02 Jan 2014 12:46:02 +0100 |
| To: | bug-Archive-Tar-Stream [...] rt.cpan.org |
| From: | "Lars K.W. Gohlke" <lkwg82 [...] gmx.de> |
Hallo Bron,
I just use ur module and I'm very satisfied with it. Thx.
I found a missing typeflag for links:
currently:
----- code -----
sub AddLink {
my $Self = shift;
my $name = shift;
my $linkname = shift;
my $header = $Self->BlankHeader(@_);
$header->{name} = $name;
$header->{linkname} = $linkname;
return $Self->WriteHeader($header);
}
-----/code -----
missing: $header->{typeflag} = 2;
better:
----- code -----
sub AddLink {
my $Self = shift;
my $name = shift;
my $linkname = shift;
my $header = $Self->BlankHeader(@_);
$header->{name} = $name;
$header->{linkname} = $linkname;
$header->{typeflag} = 2;
return $Self->WriteHeader($header);
}
-----/code -----
maybe you can fix that or correct me!
Thx a lot!
------------------------
Mit freundlichen Grüßen
M.Sc. Dipl.-Inform. (FH) Lars K.W. Gohlke
mailto:lkwg82@gmx.de
-------------------------
Visit http://www.lgohlke.de
02.01.2014 12:39
Message body is not shown because sender requested not to inline it.