X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FPoint.pm;h=354d1de6bf70fcadd0b11dd5140b45dfbcaab345;hb=e079ad00277a8e64c40d2cc1eb0a7e538e7e2c8e;hp=2309db3910c228eea5059d96d54126c2c76c9824;hpb=65b895926935d98e3bd34b82a6e8b4e4e6b2f09c;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Set/Point.pm b/lib/LaTeX/TikZ/Set/Point.pm index 2309db3..354d1de 100644 --- a/lib/LaTeX/TikZ/Set/Point.pm +++ b/lib/LaTeX/TikZ/Set/Point.pm @@ -9,27 +9,27 @@ LaTeX::TikZ::Set::Point - A set object representing a point. =head1 VERSION -Version 0.02 +Version 0.03 =cut -our $VERSION = '0.02'; +our $VERSION = '0.03'; use LaTeX::TikZ::Point; use LaTeX::TikZ::Interface; use LaTeX::TikZ::Functor; -use Any::Moose; -use Any::Moose 'Util::TypeConstraints'; +use Mouse; +use Mouse::Util::TypeConstraints; =head1 RELATIONSHIPS -This class consumes the L role, and as such implements the L method. +This class consumes the L role, and as such implements the L method. =cut -with 'LaTeX::TikZ::Set::Op'; +with 'LaTeX::TikZ::Set::Path'; =head1 ATTRIBUTES @@ -114,6 +114,18 @@ sub path { $path; } +=head2 C + +=cut + +sub begin { $_[0]->point } + +=head2 C + +=cut + +sub end { $_[0]->point } + LaTeX::TikZ::Interface->register( point => sub { shift; @@ -146,7 +158,7 @@ __PACKAGE__->meta->make_immutable; =head1 SEE ALSO -L, L. +L, L. =head1 AUTHOR @@ -167,7 +179,7 @@ You can find documentation for this module with the perldoc command. =head1 COPYRIGHT & LICENSE -Copyright 2010 Vincent Pit, all rights reserved. +Copyright 2010,2011,2012,2013,2014,2015 Vincent Pit, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.