X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FMod%2FWidth.pm;h=41c5e076bfd69750fd9b508905e2d22772452291;hp=345b3575d41ef3ce4f69d2123b9aa9996e0fb200;hb=af7d6a5aef3bf5fec0c187b3a13a14adc88251fd;hpb=92147217516a40b35ca00c8e08939e8aa5478426 diff --git a/lib/LaTeX/TikZ/Mod/Width.pm b/lib/LaTeX/TikZ/Mod/Width.pm index 345b357..41c5e07 100644 --- a/lib/LaTeX/TikZ/Mod/Width.pm +++ b/lib/LaTeX/TikZ/Mod/Width.pm @@ -15,6 +15,8 @@ Version 0.01 our $VERSION = '0.01'; +use LaTeX::TikZ::Interface; + use LaTeX::TikZ::Tools; use Any::Moose; @@ -35,11 +37,13 @@ sub declare { } sub apply { sprintf 'line width=%0.1fpt', $_[1]->thickness($_[0]->width) } -use LaTeX::TikZ::Interface width => sub { - shift; +LaTeX::TikZ::Interface->register( + width => sub { + shift; - __PACKAGE__->new(width => $_[0]); -}; + __PACKAGE__->new(width => $_[0]); + }, +); __PACKAGE__->meta->make_immutable;