Importing Variable-Magic-0.14.tar.gz

[perl/modules/Variable-Magic.git] / t / 16-huf.t

diff --git a/t/16-huf.t b/t/16-huf.t
index 6a2f750834587a701918fd5360fd37ea6b505686..0941fb288c71cc5671cf64a53800ee033a627e61 100644 (file)
--- a/t/16-huf.t
+++ b/t/16-huf.t
@@ -16,6 +16,8 @@ if ($@) {
  plan skip_all => 'Hash::Util::FieldHash required for testing uvar interaction';
 } else {
  plan tests => 12;
+ my $v = $Hash::Util::FieldHash::VERSION;
+ diag "Using Hash::Util::FieldHash $v" if defined $v;
 }
 
 Hash::Util::FieldHash::fieldhash(\my %h);