X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FCircle.pm;h=0de14df1256abfa93aa4fee2e3cdcea03798477e;hb=6832c809e7591e1c3e2809654f814c298d28d2ef;hp=d1f7317bb69ba6f70d232ced9b359831ee92455a;hpb=f54cadb836315572aa2c4bcb16f221da1687df7a;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Set/Circle.pm b/lib/LaTeX/TikZ/Set/Circle.pm index d1f7317..0de14df 100644 --- a/lib/LaTeX/TikZ/Set/Circle.pm +++ b/lib/LaTeX/TikZ/Set/Circle.pm @@ -27,11 +27,11 @@ use Any::Moose 'Util::TypeConstraints'; =head1 RELATIONSHIPS -This class consumes the L role, and as such implements the L method. +This class consumes the L role, and as such implements the L method. =cut -with 'LaTeX::TikZ::Set::Op'; +with 'LaTeX::TikZ::Set::Path'; =head1 ATTRIBUTES @@ -73,6 +73,18 @@ sub path { $set->center->path(@_) . ' circle (' . $tikz->len($set->radius) . ')'; } +=head2 C + +=cut + +sub begin { $_[0]->center->begin } + +=head2 C + +=cut + +sub end { $_[0]->center->end } + LaTeX::TikZ::Interface->register( circle => sub { shift; @@ -95,7 +107,7 @@ __PACKAGE__->meta->make_immutable; =head1 SEE ALSO -L, L, L. +L, L, L. =head1 AUTHOR