Non-VMS-fixed and Win32-skipped version of

[p5sagit/p5-mst-13.2.git] / t / op / pack.t

diff --git a/t/op/pack.t b/t/op/pack.t
index bb63cff..2fd1312 100755 (executable)
--- a/t/op/pack.t
+++ b/t/op/pack.t
@@ -699,8 +699,8 @@ foreach (
 {
     # 615
 
-    # from Wolfgang Laun:Lfix in change #13288
+    # from Wolfgang Laun: fix in change #13288
 
-    eval { unpack("P*", "abc") };
+    eval { my $t=unpack("P*", "abc") };
     ok($@ =~ /P must have an explicit size/);
 }