X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=t%2F01-api.t;h=dd098d96fa2d490a128d78cf64645016517a2a69;hp=9f00401b3c6283a0727d879a317ac8a92b0d7341;hb=65b895926935d98e3bd34b82a6e8b4e4e6b2f09c;hpb=93cd22e1b7e23ed939e79ec70c4baa5c3ecc158a

diff --git a/t/01-api.t b/t/01-api.t
index 9f00401..dd098d9 100644
--- a/t/01-api.t
+++ b/t/01-api.t
@@ -28,7 +28,7 @@ is(prototype('Tikz'), '', 'main::Tikz is actually a constant');
  ::is(prototype('T'), '', 'LaTeX::TikZ::TestAPI2::T is actually a constant');
 }
 
-my @methods = qw/
+my @methods = qw<
  formatter functor
  raw
  path seq
@@ -36,7 +36,7 @@ my @methods = qw/
  raw_mod
  clip layer
  width color fill pattern
-/;
+>;
 
 for (@methods) {
  ok(Tikz->can($_), "Tikz evaluates to something that ->can($_)");