]> git.vpit.fr Git - perl/modules/LaTeX-TikZ.git/blobdiff - t/01-api.t
Rename L::T::API to ::Interface
[perl/modules/LaTeX-TikZ.git] / t / 01-api.t
index 6bcada79c7e08b35966eee0235540e88aa923ee8..7a29a363103657c96de02cff8b93f8f341f03120 100644 (file)
@@ -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,
  );