Avoid using defined %hash in core code and tests.

[perl5.git] / ext / B / B / Concise.pm

diff --git a/ext/B/B/Concise.pm b/ext/B/B/Concise.pm
index 067d89e..671212d 100644 (file)
--- a/ext/B/B/Concise.pm
+++ b/ext/B/B/Concise.pm
@@ -14,7 +14,7 @@ use warnings; # uses #3 and #4, since warnings uses Carp
 
 use Exporter (); # use #5
 
-our $VERSION   = "0.77";
+our $VERSION   = "0.78";
 our @ISA       = qw(Exporter);
 our @EXPORT_OK = qw( set_style set_style_standard add_callback
                     concise_subref concise_cv concise_main
@@ -299,7 +299,7 @@ sub compileOpts {
        elsif ($o =~ /^-stash=(.*)/) {
            my $pkg = $1;
            no strict 'refs';
-           if (!defined %{$pkg.'::'}) {
+           if (! %{$pkg.'::'}) {
                eval "require $pkg";
            } else {
                require Config;