From: Vincent Pit <vince@profvince.com>
Date: Wed, 21 Jul 2010 13:10:25 +0000 (+0200)
Subject: Make Set::Point delegates ->x and ->y to the underlying point
X-Git-Tag: v0.01~28
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=commitdiff_plain;h=99693e9864c02528a5eb76520bff25757f12ffd8

Make Set::Point delegates ->x and ->y to the underlying point
---

diff --git a/lib/LaTeX/TikZ/Set/Point.pm b/lib/LaTeX/TikZ/Set/Point.pm
index 868fd5b..eee96b0 100644
--- a/lib/LaTeX/TikZ/Set/Point.pm
+++ b/lib/LaTeX/TikZ/Set/Point.pm
@@ -27,6 +27,7 @@ has 'point' => (
  isa      => 'LaTeX::TikZ::Point::Autocoerce',
  required => 1,
  coerce   => 1,
+ handles  => [ qw/x y/ ],
 );
 
 coerce 'LaTeX::TikZ::Set::Point'