From: Vincent Pit <vince@profvince.com>
Date: Mon, 3 Jan 2011 21:36:58 +0000 (+0100)
Subject: Switch to qw<>
X-Git-Tag: v0.06~6
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FPerl-Critic-Policy-Dynamic-NoIndirect.git;a=commitdiff_plain;h=7b4e2c7a41cf9f8f9fe08d1f0d8bb67f015460b2

Switch to qw<>
---

diff --git a/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm b/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm
index 624792e..8933982 100644
--- a/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm
+++ b/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm
@@ -26,12 +26,12 @@ Since it wraps around L<indirect>, it needs to compile the audited code and as s
 
 =cut
 
-use base qw/Perl::Critic::DynamicPolicy/;
+use base qw<Perl::Critic::DynamicPolicy>;
 
-use Perl::Critic::Utils qw/:severities/;
+use Perl::Critic::Utils qw<:severities>;
 
 sub default_severity { $SEVERITY_HIGH }
-sub default_themes   { qw/dynamic maintenance/ }
+sub default_themes   { qw<dynamic maintenance> }
 sub applies_to       { 'PPI::Document' }
 
 my $tag_obj = sub {
diff --git a/samples/check.pl b/samples/check.pl
index f444d94..7f09532 100644
--- a/samples/check.pl
+++ b/samples/check.pl
@@ -5,7 +5,7 @@ use warnings;
 
 use blib;
 
-use Perl::Critic::TestUtils qw/pcritique_with_violations/;
+use Perl::Critic::TestUtils qw<pcritique_with_violations>;
 Perl::Critic::TestUtils::block_perlcriticrc();
 
 my $code = shift || exit;
diff --git a/t/10-basic.t b/t/10-basic.t
index 146c6a1..53629b0 100644
--- a/t/10-basic.t
+++ b/t/10-basic.t
@@ -12,7 +12,7 @@ BEGIN {
 
 use Test::More tests => $tests + $subtests * $reports;
 
-use Perl::Critic::TestUtils qw/pcritique_with_violations/;
+use Perl::Critic::TestUtils qw<pcritique_with_violations>;
 
 Perl::Critic::TestUtils::block_perlcriticrc();