X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fsubs-auto.git;a=blobdiff_plain;f=t%2F13-meth.t;h=e695f0fb4da4f59f7afc472acf44d31e85bc8cad;hp=db8ee146b6e4805d36b2d886adeb54c23d1690dc;hb=bdab145ebb1c29e7ec08d6aff4b25f9282fa4d2f;hpb=54e8c3ca36072542b2689f3bca52db73dfa5f903

diff --git a/t/13-meth.t b/t/13-meth.t
index db8ee14..e695f0f 100644
--- a/t/13-meth.t
+++ b/t/13-meth.t
@@ -10,7 +10,7 @@ my %res;
 eval q[
  package subs::auto::Test;
  use subs::auto;
- $res{"${_}2"} = __PACKAGE__->can($_) ? 1 : 0 for qw/foo bar baz qux/;
+ $res{"${_}2"} = __PACKAGE__->can($_) ? 1 : 0 for qw<foo bar baz qux>;
  return;
  BEGIN { $res{foo} = __PACKAGE__->can('foo') ? 1 : 0; }
  sub bar;