X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FMod%2FPattern%2FLines.pm;h=d495ffd2067e7c72eff771c24d5d8ce150bc8b12;hp=a86844020ded2e165e087dea465d31adf8fe87f5;hb=0f9d7c1a2d11bc7001fe450cb2086e67c13a39e9;hpb=e6c6fbca8df4f8df7bbce2eb98dd260ed51d9141 diff --git a/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm b/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm index a868440..d495ffd 100644 --- a/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm +++ b/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm @@ -22,8 +22,20 @@ use LaTeX::TikZ::Tools; use Any::Moose; use Any::Moose 'Util::TypeConstraints'; +=head1 RELATIONSHIPS + +This class inherits the L class and its L, L, L and L methods. + +=cut + extends 'LaTeX::TikZ::Mod::Pattern'; +=head1 ATTRIBUTES + +=head2 C + +=cut + enum 'LaTeX::TikZ::Mod::Pattern::Direction' => ( 'horizontal', 'vertical', 'north east', 'north west', ); @@ -34,12 +46,20 @@ has 'direction' => ( default => 'horizontal', ); +=head2 C + +=cut + has 'line_width' => ( is => 'ro', isa => subtype('Num' => where { LaTeX::TikZ::Tools::numcmp($_, 0) >= 0 }), default => 1, ); +=head2 C + +=cut + has 'space_width' => ( is => 'ro', isa => subtype('Num' => where { LaTeX::TikZ::Tools::numcmp($_, 0) >= 0 }), @@ -119,8 +139,18 @@ around 'BUILDARGS' => sub { $class->$orig(%args); }; +=head1 METHODS + +=head2 C + +=cut + sub tag { join '/', ref $_[0], $_[0]->direction } +=head2 C + +=cut + sub cover { my ($this, $other) = @_; @@ -133,6 +163,10 @@ sub cover { __PACKAGE__->meta->make_immutable; +=head1 SEE ALSO + +L, L. + =head1 AUTHOR Vincent Pit, C<< >>, L.