Name another pack test

p4raw-id: //depot/perl@23850

diff --git a/t/op/pack.t b/t/op/pack.t
index 72ac95b..648c291 100755 (executable)
--- a/t/op/pack.t
+++ b/t/op/pack.t
@@ -359,7 +359,7 @@ foreach my $base (@templates) {
             skip "cannot pack '$t' on this perl", 4
               if is_valid_error($@);
 
-            is( $@, '' );
+            is( $@, '', "Template $t works");
             is(scalar @t, 2);
 
             is($t[0], 12);