X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FArc.pm;h=69fd1cf7e99dcf4e79a28f118c339a2dd9577fe6;hb=3661d7849ae4636b74000e33e068493d90ed8337;hp=c0cf352597bb62c58ca843b36d0881f086e4e356;hpb=0f9d7c1a2d11bc7001fe450cb2086e67c13a39e9;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Set/Arc.pm b/lib/LaTeX/TikZ/Set/Arc.pm index c0cf352..69fd1cf 100644 --- 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, ), ); },