X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FPoint.pm;h=151f50fcbf28a0c4157c4a5ae61627deba23f6c7;hb=3661d7849ae4636b74000e33e068493d90ed8337;hp=316624860c33e0ad95985437b176ccd3af609edb;hpb=19660696c832bcff26c87d371cccc4ffe118c782;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Point.pm b/lib/LaTeX/TikZ/Point.pm index 3166248..151f50f 100644 --- a/lib/LaTeX/TikZ/Point.pm +++ b/lib/LaTeX/TikZ/Point.pm @@ -9,20 +9,26 @@ LaTeX::TikZ::Point - Internal representation of what LaTeX::TikZ consider as 2D =head1 VERSION -Version 0.01 +Version 0.02 =cut -our $VERSION = '0.01'; +our $VERSION = '0.02'; -use Any::Moose; -use Any::Moose 'Util::TypeConstraints' => [ qw/ - coerce - from - via +use Mouse; +use Mouse::Util::TypeConstraints qw< + coerce from via find_type_constraint register_type_constraint -/ ]; +>; + +=head1 ATTRIBUTES + +=head2 C + +The abscissa of the point. + +=cut has 'x' => ( is => 'ro', @@ -30,6 +36,12 @@ has 'x' => ( required => 1, ); +=head2 C + +The ordinate of the point. + +=cut + has 'y' => ( is => 'ro', isa => 'Num', @@ -41,7 +53,7 @@ use LaTeX::TikZ::Meta::TypeConstraint::Autocoerce; register_type_constraint( LaTeX::TikZ::Meta::TypeConstraint::Autocoerce->new( name => 'LaTeX::TikZ::Point::Autocoerce', - parent => find_type_constraint(__PACKAGE__), + target => find_type_constraint(__PACKAGE__), ), ); @@ -59,6 +71,10 @@ coerce 'LaTeX::TikZ::Point::Autocoerce' __PACKAGE__->meta->make_immutable; +=head1 SEE ALSO + +L. + =head1 AUTHOR Vincent Pit, C<< >>, L.