X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fstrict.pm;h=d1479ed865ee1dd4c627f6d08ec90728f628c70c;hb=c9bca74aca217023baf0f921dcffaaa072a83cf3;hp=2eb756c938f3a281ec0765aa0b90910089ee97a3;hpb=4b2eca7a72ce307ed58cc8af1ec195a6dc39d730;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/strict.pm b/lib/strict.pm
index 2eb756c..d1479ed 100644
--- a/lib/strict.pm
+++ b/lib/strict.pm
@@ -16,12 +16,8 @@ sub bits {
         $bits |= $bitmask{$s} || 0;
     }
     if (@wrong) {
-        my $useno = {
-         __PACKAGE__.'::import' => 'use',
-         __PACKAGE__.'::unimport' => 'no'
-        }->{ (caller(1))[3] };
         require Carp;
-        Carp::croak("Don't know how to '$useno ".__PACKAGE__." qw(@wrong)'");
+        Carp::croak("Unknown 'strict' tag(s) '@wrong'");
     }
     $bits;
 }