X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FInterface.pm;h=adf63f90802f2a2d5ee44fbe5d1779ed4cf0b207;hb=af7d6a5aef3bf5fec0c187b3a13a14adc88251fd;hp=0e902f576e45efdb95cbda3bea1f312a249fda03;hpb=1918fdf5100058cd6a4281bc8b04ec8977841e5e;p=perl%2Fmodules%2FLaTeX-TikZ.git diff --git a/lib/LaTeX/TikZ/Interface.pm b/lib/LaTeX/TikZ/Interface.pm index 0e902f5..adf63f9 100644 --- a/lib/LaTeX/TikZ/Interface.pm +++ b/lib/LaTeX/TikZ/Interface.pm @@ -17,13 +17,9 @@ our $VERSION = '0.01'; use Sub::Name (); -sub import { +sub register { shift; - register(@_); -} - -sub register { while (@_ >= 2) { my ($name, $code) = splice @_, 0, 2; @@ -55,6 +51,7 @@ sub register { sub load { require LaTeX::TikZ::Formatter; # formatter + require LaTeX::TikZ::Functor; # functor require LaTeX::TikZ::Set::Raw; # raw @@ -67,6 +64,7 @@ sub load { require LaTeX::TikZ::Set::Rectangle; # rectangle require LaTeX::TikZ::Set::Circle; # circle require LaTeX::TikZ::Set::Arc; # arc + require LaTeX::TikZ::Set::Arrow; # arrow require LaTeX::TikZ::Mod::Raw; # raw_mod @@ -76,6 +74,7 @@ sub load { require LaTeX::TikZ::Mod::Width; # width require LaTeX::TikZ::Mod::Color; # color require LaTeX::TikZ::Mod::Fill; # fill + require LaTeX::TikZ::Mod::Pattern; # pattern } =head1 AUTHOR