Just use Mouse instead of Any::Moose

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

diff --git a/lib/LaTeX/TikZ/Set/Arc.pm b/lib/LaTeX/TikZ/Set/Arc.pm
index c0cf352597bb62c58ca843b36d0881f086e4e356..69fd1cf7e99dcf4e79a28f118c339a2dd9577fe6 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Arc.pm
+++ b/lib/LaTeX/TikZ/Set/Arc.pm
@@ -9,11 +9,11 @@ LaTeX::TikZ::Set::Arc - A combined set object representing an arc.
 
 =head1 VERSION
 
-Version 0.01
+Version 0.02
 
 =cut
 
-our $VERSION = '0.01';
+our $VERSION = '0.02';
 
 use Carp          ();
 use Math::Complex ();
@@ -28,7 +28,7 @@ use LaTeX::TikZ::Interface;
 
 use LaTeX::TikZ::Tools;
 
-use Any::Moose 'Util::TypeConstraints' => [ 'find_type_constraint' ];
+use Mouse::Util::TypeConstraints 'find_type_constraint';
 
 my $ltp_tc = find_type_constraint('LaTeX::TikZ::Point::Autocoerce');
 
@@ -72,7 +72,7 @@ LaTeX::TikZ::Interface->register(
   $set->clip(
    LaTeX::TikZ::Set::Polyline->new(
     points => [ $ua, @outside, $ub ],
-    closed => 1,
+    cycle  => 1,
    ),
   );
  },