X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FPoint.pm;h=120dc7fec1ad845a565af5fe79368c5fb5d1a653;hb=1be10f0f8ab18b5c559d8a48270dda1ebd2d78bc;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..120dc7f 100644 --- a/lib/LaTeX/TikZ/Set/Point.pm +++ b/lib/LaTeX/TikZ/Set/Point.pm @@ -20,16 +20,16 @@ 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.