Just use Mouse instead of Any::Moose

[perl/modules/LaTeX-TikZ.git] / lib / LaTeX / TikZ / Set.pm

diff --git a/lib/LaTeX/TikZ/Set.pm b/lib/LaTeX/TikZ/Set.pm
index e673097ec2f20e7a9349e8cabff8cdef3cfb84c3..44ee46fdbbbf2575e6dd09b00f733e9be31f1a3a 100644 (file)
--- a/lib/LaTeX/TikZ/Set.pm
+++ b/lib/LaTeX/TikZ/Set.pm
@@ -20,7 +20,7 @@ use LaTeX::TikZ::Scope;
 
 use LaTeX::TikZ::Tools;
 
-use Any::Moose 'Role';
+use Mouse::Role;
 
 =head1 ATTRIBUTES
 
@@ -94,9 +94,10 @@ around 'draw' => sub {
 
  my @mods = $cxt->effective_mods;
  if (@mods) {
-  $body = LaTeX::TikZ::Scope->new
-                            ->mod(map $_->apply($tikz), @mods)
-                            ->body($body);
+  $body = LaTeX::TikZ::Scope->new(
+   mods => [ map $_->apply($tikz), @mods ],
+   body => $body,
+  );
  }
 
  $body;