X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FMod%2FPattern%2FDots.pm;h=1e3bfaa34902e3205673d866ca56caa05c8067a1;hb=0f9d7c1a2d11bc7001fe450cb2086e67c13a39e9;hp=b029915d02c60b3b506ebcd4c2780ee9a6b1892d;hpb=d934d1a7f7268b248687f14e0ede2723010bf243;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Mod/Pattern/Dots.pm b/lib/LaTeX/TikZ/Mod/Pattern/Dots.pm index b029915..1e3bfaa 100644 --- a/lib/LaTeX/TikZ/Mod/Pattern/Dots.pm +++ b/lib/LaTeX/TikZ/Mod/Pattern/Dots.pm @@ -18,18 +18,35 @@ our $VERSION = '0.01'; use Sub::Name (); 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 + has 'dot_width' => ( is => 'ro', - isa => 'Int', + isa => subtype('Num' => where { LaTeX::TikZ::Tools::numcmp($_, 0) >= 0 }), default => 1, ); +=head2 C + +=cut + has 'space_width' => ( is => 'ro', - isa => 'Int', + isa => subtype('Num' => where { LaTeX::TikZ::Tools::numcmp($_, 0) >= 0 }), default => 1, ); @@ -83,6 +100,10 @@ around 'BUILDARGS' => sub { __PACKAGE__->meta->make_immutable; +=head1 SEE ALSO + +L, L. + =head1 AUTHOR Vincent Pit, C<< >>, L.