Remove magic LaTeX::TikZ::Interface->import

[perl/modules/LaTeX-TikZ.git] / lib / LaTeX / TikZ / Mod / Raw.pm

diff --git a/lib/LaTeX/TikZ/Mod/Raw.pm b/lib/LaTeX/TikZ/Mod/Raw.pm
index c6e1a2c1ad51c99f79358049c7e962689fc6dd70..28b1d1dc69c420e41fc85efd81a506f686c648b8 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Raw.pm
+++ b/lib/LaTeX/TikZ/Mod/Raw.pm
@@ -15,6 +15,8 @@ Version 0.01
 
 our $VERSION = '0.01';
 
+use LaTeX::TikZ::Interface;
+
 use Any::Moose;
 
 with 'LaTeX::TikZ::Mod';
@@ -28,7 +30,7 @@ has 'content' => (
 sub tag {
  my ($self) = @_;
 
- ref($self) . '%' . $self->content;
+ ref($self) . '/' . $self->content;
 }
 
 sub cover { 1 }
@@ -37,11 +39,13 @@ sub declare { }
 
 sub apply { $_[0]->content }
 
-use LaTeX::TikZ::API raw_mod => sub {
- shift;
+LaTeX::TikZ::Interface->register(
+ raw_mod => sub {
+  shift;
 
- __PACKAGE__->new(content => $_[0]);
-};
+  __PACKAGE__->new(content => $_[0]);
+ },
+);
 
 __PACKAGE__->meta->make_immutable;