X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FLine.pm;h=3ee969493a0f764a292c4cdca1ea424dd3c219f0;hb=65b895926935d98e3bd34b82a6e8b4e4e6b2f09c;hp=b34c730168259452f213ec1f3926069e98571b70;hpb=0f9d7c1a2d11bc7001fe450cb2086e67c13a39e9;p=perl%2Fmodules%2FLaTeX-TikZ.git

diff --git a/lib/LaTeX/TikZ/Set/Line.pm b/lib/LaTeX/TikZ/Set/Line.pm
index b34c730..3ee9694 100644
--- a/lib/LaTeX/TikZ/Set/Line.pm
+++ b/lib/LaTeX/TikZ/Set/Line.pm
@@ -9,11 +9,11 @@ LaTeX::TikZ::Set::Line - A set object representing a line.
 
 =head1 VERSION
 
-Version 0.01
+Version 0.02
 
 =cut
 
-our $VERSION = '0.01';
+our $VERSION = '0.02';
 
 use LaTeX::TikZ::Set::Point;
 
@@ -81,7 +81,7 @@ LaTeX::TikZ::Interface->register(
 LaTeX::TikZ::Functor->default_rule(
  (__PACKAGE__) => sub {
   my ($functor, $set, @args) = @_;
-  $set->new(map { $_ => $set->$_->$functor(@args) } qw/from to/)
+  $set->new(map { $_ => $set->$_->$functor(@args) } qw<from to>)
  }
 );