X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2Fevil.pm;fp=lib%2Fevil.pm;h=c5faa09bf2163ff7b4cf3b16ca3639d603866e82;hb=277b168dc15c1824c8d4fc06b88f920bb82a9be2;hp=72dabb0d9746a2699367a20e36779a78738e71fe;hpb=2f63ec14a6c5ecfb9c917ccd9d5016e31d3a508c;p=acme-evil.git

diff --git a/lib/evil.pm b/lib/evil.pm
index 72dabb0..c5faa09 100644
--- a/lib/evil.pm
+++ b/lib/evil.pm
@@ -37,10 +37,10 @@ sub import {
 }
 
 sub unimport {
-	my $strict_arg = grep /^:strict$/, @_;
-	my $intermediate_arg = grep /^:intermediate$/, @_;
-	my $lax_arg = grep /^:lax$/, @_;
-	my $disable_arg = grep /^:disable/, @_;
+	my $strict_arg = grep /^:strict$/i, @_;
+	my $intermediate_arg = grep /^:intermediate$/i, @_;
+	my $lax_arg = grep /^:lax$/i, @_;
+	my $disable_arg = grep /^:disable$/i, @_;
 
 	if (!$disable_arg && $tainted{caller()}) { # caller is evil
 		croak 'Current module is evil'