use Sub::Name ();
use Any::Moose;
+use Any::Moose 'Util::TypeConstraints';
extends 'LaTeX::TikZ::Mod::Pattern';
has 'dot_width' => (
is => 'ro',
- isa => 'Int',
+ isa => subtype('Num' => where { LaTeX::TikZ::Tools::numcmp($_, 0) >= 0 }),
default => 1,
);
has 'space_width' => (
is => 'ro',
- isa => 'Int',
+ isa => subtype('Num' => where { LaTeX::TikZ::Tools::numcmp($_, 0) >= 0 }),
default => 1,
);