X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=t%2F01-api.t;h=7a29a363103657c96de02cff8b93f8f341f03120;hp=6bcada79c7e08b35966eee0235540e88aa923ee8;hb=5adf00c880491bac3bd793a07431cf161c03643f;hpb=e955781895f97b6ff7ec50270466d459c992e4e1 diff --git a/t/01-api.t b/t/01-api.t index 6bcada7..7a29a36 100644 --- a/t/01-api.t +++ b/t/01-api.t @@ -41,11 +41,11 @@ for (@methods) { ok(Tikz->can($_), "Tikz evaluates to something that ->can($_)"); } -require LaTeX::TikZ::API; +require LaTeX::TikZ::Interface; for my $name (undef, ':)') { eval { - LaTeX::TikZ::API->import( + LaTeX::TikZ::Interface->import( $name => sub { }, ); }; @@ -53,7 +53,7 @@ for my $name (undef, ':)') { } eval { - LaTeX::TikZ::API->import( + LaTeX::TikZ::Interface->import( 'raw' => sub { }, ); }; @@ -61,7 +61,7 @@ like $@, qr/^'raw' is already defined/, 'already defined'; for my $code (undef, [ ]) { eval { - LaTeX::TikZ::API->import( + LaTeX::TikZ::Interface->import( 'foo' => $code, ); }; @@ -69,7 +69,7 @@ for my $code (undef, [ ]) { } eval { - LaTeX::TikZ::API->import( + LaTeX::TikZ::Interface->import( 'foo' => sub { @_ }, ); }; @@ -78,7 +78,7 @@ ok(Tikz->can('foo'), 'Tikz evaluates to something that ->can(foo)'); is_deeply [ Tikz->foo('hello') ], [ Tikz, 'hello' ], 'Tikz->foo works'; eval { - LaTeX::TikZ::API->import( + LaTeX::TikZ::Interface->import( 'bar' => sub { @_ }, 'baz' => undef, );