RE: [PATCH] RE: what problem solves e3def60f ?

... the updated patch also increments strict.pm version.

--- strict.pm-	2016-01-08 18:22:20.246454624 +0000
+++ strict.pm	2016-02-12 03:31:52.792023871 +0000
@@ -1,13 +1,6 @@
 package strict;
 
-$strict::VERSION = "1.09";
-
-# Verify that we're called correctly so that strictures will work.
-unless ( __FILE__ =~ /(^|[\/\\])\Q${\__PACKAGE__}\E\.pmc?$/ ) {
-    # Can't use Carp, since Carp uses us!
-    my (undef, $f, $l) = caller;
-    die("Incorrect use of pragma '${\__PACKAGE__}' at $f line $l.\n");
-}
+$strict::VERSION = "1.10";
 
 my ( %bitmask, %explicit_bitmask );
 
@@ -35,6 +28,14 @@
 
     my $inline_all_explicit_bits = $bits;
     *all_explicit_bits = sub () { $inline_all_explicit_bits };
+
+    # Verify that we're called correctly so that strictures will work.
+    if ( __FILE__ =~ /(\w+)\.pmc?$/ and $1 ne __PACKAGE__ ) {
+        # Can't use Carp, since Carp uses us!
+        my (undef, $f, $l) = caller;
+        die("Incorrect use of pragma '${\__PACKAGE__}' at $f line $l.\n");
+    }
+
 }
 
 sub bits {