Change 13594 by jhi@alpha on 2001/12/10 13:26:24
Subject: [PATCH] Re: [PATCH t/op/pack.t] Cleanup
From: Michael G Schwern <[EMAIL PROTECTED]>
Date: Mon, 10 Dec 2001 02:47:40 -0500
Message-ID: <20011210074739.GH1770@blackrider>
Affected files ...
.... //depot/perl/t/op/pack.t#56 edit
Differences ...
==== //depot/perl/t/op/pack.t#56 (xtext) ====
Index: perl/t/op/pack.t
--- perl/t/op/pack.t.~1~ Mon Dec 10 06:30:06 2001
+++ perl/t/op/pack.t Mon Dec 10 06:30:06 2001
@@ -205,13 +205,13 @@
is( $@, '' );
is(scalar @t, 2);
- if( $t =~ /[nv]/i ) {
+
+ SKIP: {
+ skip "$t not expected to work for some reason", 2 if $t =~ /[nv]/i;
+
is($t[0], 12);
is($t[1], 34);
}
- else {
- pass() for 1..2;
- }
}
}
End of Patch.
