X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FSet%2FRectangle.pm;h=838ff95697a039166b6a0052e97228df485a92d8;hp=2e290db8be8b013b6f42c2595d328580d0a1c8ef;hb=6832c809e7591e1c3e2809654f814c298d28d2ef;hpb=95aada0ec5b3c5a0d78ed0ad53436b0e70860bc7 diff --git a/lib/LaTeX/TikZ/Set/Rectangle.pm b/lib/LaTeX/TikZ/Set/Rectangle.pm index 2e290db..838ff95 100644 --- a/lib/LaTeX/TikZ/Set/Rectangle.pm +++ b/lib/LaTeX/TikZ/Set/Rectangle.pm @@ -92,6 +92,18 @@ sub path { $set->from->path(@_) . ' rectangle ' . $set->to->path(@_); } +=head2 C + +=cut + +sub begin { $_[0]->from->begin } + +=head2 C + +=cut + +sub end { $_[0]->to->end } + my $meta = __PACKAGE__->meta; my $tc1 = $meta->find_attribute_by_name('from')->type_constraint; my $tc2 = $meta->find_attribute_by_name('to')->type_constraint;