X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FMod%2FPattern%2FLines.pm;h=c9978e0bc580867db431068cf0dfe38d8d0d7c56;hb=f54cadb836315572aa2c4bcb16f221da1687df7a;hp=10a63f49d470aec29bf0a37786e14a0048bf4873;hpb=d8d667d1c5266bff861df78c252c92d1504be92c;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm b/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm index 10a63f4..c9978e0 100644 --- a/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm +++ b/lib/LaTeX/TikZ/Mod/Pattern/Lines.pm @@ -9,11 +9,11 @@ LaTeX::TikZ::Mod::Pattern::Lines - An hatched pattern modifier. =head1 VERSION -Version 0.01 +Version 0.02 =cut -our $VERSION = '0.01'; +our $VERSION = '0.02'; use Sub::Name (); @@ -24,7 +24,7 @@ use Any::Moose 'Util::TypeConstraints'; =head1 RELATIONSHIPS -This class inherits the L class and its L, L, L and L methods. +This class inherits the L class and its L, L, L and L methods. =cut @@ -147,11 +147,11 @@ around 'BUILDARGS' => sub { sub tag { join '/', ref $_[0], $_[0]->direction } -=head2 C +=head2 C =cut -sub cover { +sub covers { my ($this, $other) = @_; LaTeX::TikZ::Tools::numeq($this->line_width, $other->line_width) or return 0;