On 2015-03-09 02:25:54, SREZIC wrote:
Show quoted text> See subject.
It seems that skip() logic needs to be fixed. See attached patch.
From 0085c16ed066b69e25082f8c48d9703cdd4c9bff Mon Sep 17 00:00:00 2001
From: Slaven Rezic <slaven@rezic.de>
Date: Mon, 9 Mar 2015 07:25:05 +0100
Subject: [PATCH] fix skip for non-gnu tar [RT #102645]
---
t/001Basic.t | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/t/001Basic.t b/t/001Basic.t
index e97e7cb..3f822c5 100644
--- a/t/001Basic.t
+++ b/t/001Basic.t
@@ -131,12 +131,13 @@ SKIP: {
$f1 = $a6->locate("bar/bar.dat");
ok(defined $f1, "numeric owner works");
+}
+SKIP: {
# gnu options
my $tar = Archive::Tar::Wrapper->new(
tar_gnu_write_options => ["--exclude=foo"],
);
-
skip "Only with gnu tar", 1 unless $tar->is_gnu();
my $file_loc = $tar->locate("001Basic.t");
--
2.1.2