X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FMod%2FWidth.pm;h=b6086e30ff39c3767dc8919b6d7901ed224101b1;hb=37b2cca5547d02b2a751a26f9949d492b5002c2e;hp=41c5e076bfd69750fd9b508905e2d22772452291;hpb=af7d6a5aef3bf5fec0c187b3a13a14adc88251fd;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Mod/Width.pm b/lib/LaTeX/TikZ/Mod/Width.pm index 41c5e07..b6086e3 100644 --- a/lib/LaTeX/TikZ/Mod/Width.pm +++ b/lib/LaTeX/TikZ/Mod/Width.pm @@ -21,20 +21,50 @@ use LaTeX::TikZ::Tools; use Any::Moose; +=head1 RELATIONSHIPS + +This class consumes the L role, and as such implements the L, L, L and L methods. + +=cut + with 'LaTeX::TikZ::Mod'; +=head1 ATTRIBUTES + +=head2 C + +=cut + has 'width' => ( is => 'ro', isa => 'Int', required => 1, ); +=head1 METHODS + +=head2 C + +=cut + sub tag { ref $_[0] } -sub cover { LaTeX::TikZ::Tools::numeq($_[0]->width, $_[1]->width) } +=head2 C + +=cut + +sub covers { LaTeX::TikZ::Tools::numeq($_[0]->width, $_[1]->width) } + +=head2 C + +=cut sub declare { } +=head2 C + +=cut + sub apply { sprintf 'line width=%0.1fpt', $_[1]->thickness($_[0]->width) } LaTeX::TikZ::Interface->register( @@ -47,6 +77,10 @@ LaTeX::TikZ::Interface->register( __PACKAGE__->meta->make_immutable; +=head1 SEE ALSO + +L, L. + =head1 AUTHOR Vincent Pit, C<< >>, L.