X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FFormatter.pm;h=2b87450cb3a5d6bd00e1a81cead7eda58acdaa25;hb=3661d7849ae4636b74000e33e068493d90ed8337;hp=77f3b53b1b609763635fe266e03aeaea596fc281;hpb=65b895926935d98e3bd34b82a6e8b4e4e6b2f09c;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Formatter.pm b/lib/LaTeX/TikZ/Formatter.pm index 77f3b53..2b87450 100644 --- a/lib/LaTeX/TikZ/Formatter.pm +++ b/lib/LaTeX/TikZ/Formatter.pm @@ -29,8 +29,8 @@ use LaTeX::TikZ::Interface; use LaTeX::TikZ::Tools; -use Any::Moose; -use Any::Moose 'Util::TypeConstraints'; +use Mouse; +use Mouse::Util::TypeConstraints; =head1 ATTRIBUTES @@ -212,11 +212,9 @@ my $find_mods = do { } } - my @subsets = $set->isa('LaTeX::TikZ::Set::Sequence') + my @subsets = $set->does('LaTeX::TikZ::Set::Container') ? $set->kids - : $set->isa('LaTeX::TikZ::Set::Path') - ? $set->ops - : (); + : (); $find_mods_rec->($_, $layers, $others) for @subsets; });