Switch to qw<>

[perl/modules/subs-auto.git] / t / 05-args.t

diff --git a/t/05-args.t b/t/05-args.t
index d449b7326788daed0687d16c22ca31b6507d7042..5a1a3dcaf23433cbdf14deb9b9da0509a7e20c6a 100644 (file)
--- a/t/05-args.t
+++ b/t/05-args.t
@@ -7,7 +7,7 @@ use Test::More tests => 8;
 
 my $invalid = qr/Invalid\s+package\s+name/;
 
-eval "use subs::auto qw/a b c/";
+eval "use subs::auto qw<a b c>";
 like($@, qr|Optional\s+arguments\s+must\s+be\s+passed\s+as\s+keys?\s*/\s*values?\s+pairs?|, 'no even number of args');
 
 eval "use subs::auto in => \\( q{foo::bar} )";