X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FPolyline.pm;h=dbd9b0ab8c95a9d0697a21625fe4d0b638a74f8c;hb=f54cadb836315572aa2c4bcb16f221da1687df7a;hp=705cac313083fdb4e13a9a86fb2e4a7230910204;hpb=af7d6a5aef3bf5fec0c187b3a13a14adc88251fd;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Set/Polyline.pm b/lib/LaTeX/TikZ/Set/Polyline.pm index 705cac3..dbd9b0a 100644 --- a/lib/LaTeX/TikZ/Set/Polyline.pm +++ b/lib/LaTeX/TikZ/Set/Polyline.pm @@ -5,15 +5,15 @@ use warnings; =head1 NAME -LaTeX::TikZ::Set::Polyline - A set object representing a line. +LaTeX::TikZ::Set::Polyline - A set object representing a possibly closed path composed of contiguous lines. =head1 VERSION -Version 0.01 +Version 0.02 =cut -our $VERSION = '0.01'; +our $VERSION = '0.02'; use LaTeX::TikZ::Set::Point; @@ -23,6 +23,12 @@ use LaTeX::TikZ::Functor; use Any::Moose; use Any::Moose 'Util::TypeConstraints'; +=head1 RELATIONSHIPS + +This class consumes the L role, and as such implements the L method. + +=cut + with 'LaTeX::TikZ::Set::Op'; subtype 'LaTeX::TikZ::Set::Polyline::Vertices' @@ -34,6 +40,14 @@ coerce 'LaTeX::TikZ::Set::Polyline::Vertices' => from 'ArrayRef[Any]' => via { [ map LaTeX::TikZ::Set::Point->new(point => $_), @$_ ] }; +=head1 ATTRIBUTES + +=head2 C + +The list of the successive vertices of the path. + +=cut + has '_points' => ( is => 'ro', isa => 'LaTeX::TikZ::Set::Polyline::Vertices', @@ -44,12 +58,24 @@ has '_points' => ( sub points { @{$_[0]->_points} } +=head2 C + +A boolean that indicates whether the path is closed or not. + +=cut + has 'closed' => ( is => 'ro', isa => 'Bool', default => 0, ); +=head1 METHODS + +=head2 C + +=cut + sub path { my $set = shift; @@ -82,6 +108,10 @@ LaTeX::TikZ::Functor->default_rule( __PACKAGE__->meta->make_immutable; +=head1 SEE ALSO + +L, L. + =head1 AUTHOR Vincent Pit, C<< >>, L.