Introduce the ->begin and ->end path methods

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

diff --git a/lib/LaTeX/TikZ/Set/Point.pm b/lib/LaTeX/TikZ/Set/Point.pm
index d5761d17614c4186e66535b14c3e995af15bcdf1..4cf79921e16fe2d594059a52c69bf094379d3a86 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Point.pm
+++ b/lib/LaTeX/TikZ/Set/Point.pm
@@ -114,6 +114,18 @@ sub path {
  $path;
 }
 
+=head2 C<begin>
+
+=cut
+
+sub begin { $_[0]->point }
+
+=head2 C<end>
+
+=cut
+
+sub end { $_[0]->point }
+
 LaTeX::TikZ::Interface->register(
  point => sub {
   shift;