X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FLine.pm;h=bf41d14ac24fcfedbb30e20560765df3897726ff;hp=ffe5975c89a27be0db00f3ec03860b0903fb1829;hb=e6c6fbca8df4f8df7bbce2eb98dd260ed51d9141;hpb=fcf49f47b7655e0bc3ed8c3da7f1004cbb70c7a5 diff --git a/lib/LaTeX/TikZ/Set/Line.pm b/lib/LaTeX/TikZ/Set/Line.pm index ffe5975..bf41d14 100644 --- a/lib/LaTeX/TikZ/Set/Line.pm +++ b/lib/LaTeX/TikZ/Set/Line.pm @@ -22,8 +22,22 @@ use LaTeX::TikZ::Functor; use Any::Moose; +=head1 RELATIONSHIPS + +This class consumes the L role, and as such implements the L method. + +=cut + with 'LaTeX::TikZ::Set::Op'; +=head1 ATTRIBUTES + +=head2 C + +The first endpoint of the line, as a L object. + +=cut + has 'from' => ( is => 'ro', isa => 'LaTeX::TikZ::Set::Point', @@ -31,6 +45,12 @@ has 'from' => ( coerce => 1, ); +=head2 C + +The second endpoint of the line, also as a L object. + +=cut + has 'to' => ( is => 'ro', isa => 'LaTeX::TikZ::Set::Point', @@ -38,6 +58,12 @@ has 'to' => ( coerce => 1, ); +=head1 METHODS + +=head2 C + +=cut + sub path { my $set = shift;