Rename L::T::API to ::Interface

diff --git a/MANIFEST b/MANIFEST
index 4d8c3472c4cafc61502009b6c6286ff6e73b0b0c..41853b7290dbc362639529b11dbf2362c68170e6 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -4,8 +4,8 @@ META.yml
 Makefile.PL
 README
 lib/LaTeX/TikZ.pm
-lib/LaTeX/TikZ/API.pm
 lib/LaTeX/TikZ/Formatter.pm
+lib/LaTeX/TikZ/Interface.pm
 lib/LaTeX/TikZ/Mod.pm
 lib/LaTeX/TikZ/Mod/Clip.pm
 lib/LaTeX/TikZ/Mod/Color.pm

diff --git a/lib/LaTeX/TikZ.pm b/lib/LaTeX/TikZ.pm
index 713aff81f2a27593e18f1d1a2370be577a8d85d0..fc0c0940f33cc1aa7bb72552b9d35c9278a06b01 100644 (file)
--- a/lib/LaTeX/TikZ.pm
+++ b/lib/LaTeX/TikZ.pm
@@ -15,7 +15,7 @@ Version 0.01
 
 our $VERSION = '0.01';
 
-use LaTeX::TikZ::API;
+use LaTeX::TikZ::Interface;
 
 sub import {
  shift;
@@ -29,13 +29,13 @@ sub import {
  }
 
  my $pkg   = caller;
- my $const = sub () { 'LaTeX::TikZ::API' };
+ my $const = sub () { 'LaTeX::TikZ::Interface' };
  {
   no strict 'refs';
   *{$pkg . '::' . $name} = $const;
  }
 
- LaTeX::TikZ::API->load;
+ LaTeX::TikZ::Interface->load;
 
  return;
 }

diff --git a/lib/LaTeX/TikZ/Formatter.pm b/lib/LaTeX/TikZ/Formatter.pm
index d349ed3d207d8794860da79dfd2c472bde903706..44af1c8bdc1d634542755f8a066ed9df5d770de4 100644 (file)
--- a/lib/LaTeX/TikZ/Formatter.pm
+++ b/lib/LaTeX/TikZ/Formatter.pm
@@ -159,7 +159,7 @@ sub thickness {
  0.8 * $width * ($tikz->scale / 5);
 }
 
-use LaTeX::TikZ::API formatter => sub {
+use LaTeX::TikZ::Interface formatter => sub {
  shift;
 
  __PACKAGE__->new(@_);

diff --git a/lib/LaTeX/TikZ/API.pm b/lib/LaTeX/TikZ/Interface.pm
similarity index 93%
rename from lib/LaTeX/TikZ/API.pm
rename to lib/LaTeX/TikZ/Interface.pm
index 46fe198c5df5dc5a792d56c4e625c48348966a83..91342abfc1e70464c586497d2b2d0cc0bcf910b5 100644 (file)
--- a/lib/LaTeX/TikZ/API.pm
+++ b/lib/LaTeX/TikZ/Interface.pm
@@ -1,11 +1,11 @@
-package LaTeX::TikZ::API;
+package LaTeX::TikZ::Interface;
 
 use strict;
 use warnings;
 
 =head1 NAME
 
-LaTeX::TikZ::API - LaTeX::TikZ public API register and loader.
+LaTeX::TikZ::Interface - LaTeX::TikZ public interface register and loader.
 
 =head1 VERSION
 
@@ -101,4 +101,4 @@ This program is free software; you can redistribute it and/or modify it under th
 
 =cut
 
-1; # End of LaTeX::TikZ::API
+1; # End of LaTeX::TikZ::Interface

diff --git a/lib/LaTeX/TikZ/Mod/Clip.pm b/lib/LaTeX/TikZ/Mod/Clip.pm
index 5fdac3d55431eecb7a474378df17eedf72a3d86e..ab68d3aebbcf14e422e2999803eddc9a192c2c15 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Clip.pm
+++ b/lib/LaTeX/TikZ/Mod/Clip.pm
@@ -136,7 +136,7 @@ sub apply {
  )
 }
 
-use LaTeX::TikZ::API clip => sub {
+use LaTeX::TikZ::Interface clip => sub {
  shift;
 
  __PACKAGE__->new(clip => $_[0]);

diff --git a/lib/LaTeX/TikZ/Mod/Color.pm b/lib/LaTeX/TikZ/Mod/Color.pm
index 53fe41134ef48d92a8c2d76b982c5ff2c788cdc2..47cc8a2e529788aa8c7cf39d32864b982cc1d66c 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Color.pm
+++ b/lib/LaTeX/TikZ/Mod/Color.pm
@@ -33,7 +33,7 @@ sub declare { }
 
 sub apply { 'color=' . $_[0]->color }
 
-use LaTeX::TikZ::API color => sub {
+use LaTeX::TikZ::Interface color => sub {
  shift;
 
  __PACKAGE__->new(color => $_[0]);

diff --git a/lib/LaTeX/TikZ/Mod/Fill.pm b/lib/LaTeX/TikZ/Mod/Fill.pm
index 8d350d758096162e0104ed3f3bd5021bbc32a87b..f729dea4d0d488e748c269d9e7abfefa8a9e790a 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Fill.pm
+++ b/lib/LaTeX/TikZ/Mod/Fill.pm
@@ -33,7 +33,7 @@ sub declare { }
 
 sub apply { 'fill=' . $_[0]->color }
 
-use LaTeX::TikZ::API fill => sub {
+use LaTeX::TikZ::Interface fill => sub {
  shift;
 
  __PACKAGE__->new(color => $_[0]);

diff --git a/lib/LaTeX/TikZ/Mod/Layer.pm b/lib/LaTeX/TikZ/Mod/Layer.pm
index f1f0daf472defc03daf8874415b2e735ae579def..6b3f73de0967e2e2e5149632370ac5832fb40b06 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Layer.pm
+++ b/lib/LaTeX/TikZ/Mod/Layer.pm
@@ -190,7 +190,7 @@ sub apply {
  )
 }
 
-use LaTeX::TikZ::API layer => sub {
+use LaTeX::TikZ::Interface layer => sub {
  shift;
 
  my $name = shift;

diff --git a/lib/LaTeX/TikZ/Mod/Raw.pm b/lib/LaTeX/TikZ/Mod/Raw.pm
index f5a32183e9b0a6200646e63f34df0a9b47d74cff..1d0572086adacf3e7f80c4f1588f099c339ba6a9 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Raw.pm
+++ b/lib/LaTeX/TikZ/Mod/Raw.pm
@@ -37,7 +37,7 @@ sub declare { }
 
 sub apply { $_[0]->content }
 
-use LaTeX::TikZ::API raw_mod => sub {
+use LaTeX::TikZ::Interface raw_mod => sub {
  shift;
 
  __PACKAGE__->new(content => $_[0]);

diff --git a/lib/LaTeX/TikZ/Mod/Width.pm b/lib/LaTeX/TikZ/Mod/Width.pm
index bc6ad7021bf7c780c5e15be2d5cbdfa2e1435718..345b3575d41ef3ce4f69d2123b9aa9996e0fb200 100644 (file)
--- a/lib/LaTeX/TikZ/Mod/Width.pm
+++ b/lib/LaTeX/TikZ/Mod/Width.pm
@@ -35,7 +35,7 @@ sub declare { }
 
 sub apply { sprintf 'line width=%0.1fpt', $_[1]->thickness($_[0]->width) }
 
-use LaTeX::TikZ::API width => sub {
+use LaTeX::TikZ::Interface width => sub {
  shift;
 
  __PACKAGE__->new(width => $_[0]);

diff --git a/lib/LaTeX/TikZ/Set/Circle.pm b/lib/LaTeX/TikZ/Set/Circle.pm
index c3a0ec0f1bffa3e6ebdd2cce26bfb229de26466c..b1d83b83454a9217715d5c57769b25dee7b1720c 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Circle.pm
+++ b/lib/LaTeX/TikZ/Set/Circle.pm
@@ -46,7 +46,7 @@ sub path {
  $set->center->path(@_) . ' circle (' . $tikz->len($set->radius) . ')';
 }
 
-use LaTeX::TikZ::API circle => sub {
+use LaTeX::TikZ::Interface circle => sub {
  shift;
 
  __PACKAGE__->new(center => $_[0], radius => $_[1]);

diff --git a/lib/LaTeX/TikZ/Set/Line.pm b/lib/LaTeX/TikZ/Set/Line.pm
index 238e1f7f75a73fa3ea13ad44e4e6a42ee6eff926..6e73e38b5bb24106c6ecceb85f552b031c239efa 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Line.pm
+++ b/lib/LaTeX/TikZ/Set/Line.pm
@@ -37,7 +37,7 @@ sub path {
  $set->from->path(@_) . ' -- ' . $set->to->path(@_);
 }
 
-use LaTeX::TikZ::API line => sub {
+use LaTeX::TikZ::Interface line => sub {
  shift;
 
  __PACKAGE__->new(from => $_[0], to => $_[1]);

diff --git a/lib/LaTeX/TikZ/Set/Path.pm b/lib/LaTeX/TikZ/Set/Path.pm
index 0b695c62c622cb27e30eeae6539716adb842ef2b..18b9020d120da1ef7b26eedcb3379d8e5eb94632 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Path.pm
+++ b/lib/LaTeX/TikZ/Set/Path.pm
@@ -55,7 +55,7 @@ sub path {
  join ' ', map $_->path(@_), $set->ops;
 }
 
-use LaTeX::TikZ::API path => sub {
+use LaTeX::TikZ::Interface path => sub {
  shift;
 
  __PACKAGE__->new(ops => \@_);

diff --git a/lib/LaTeX/TikZ/Set/Point.pm b/lib/LaTeX/TikZ/Set/Point.pm
index 85c35cf843f03fcdc05f48b94a13907499b9258b..2c613d80931c98a306f91cfed289082498db424e 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Point.pm
+++ b/lib/LaTeX/TikZ/Set/Point.pm
@@ -33,7 +33,7 @@ sub path {
  '(' . $tikz->len($p->Re) . ',' . $tikz->len($p->Im) . ')';
 }
 
-use LaTeX::TikZ::API point => sub {
+use LaTeX::TikZ::Interface point => sub {
  shift;
 
  __PACKAGE__->new(point => $_[0]);

diff --git a/lib/LaTeX/TikZ/Set/Raw.pm b/lib/LaTeX/TikZ/Set/Raw.pm
index 66784ea32de90a0654414ce5d226b9ee13ca0bdc..169569f9aab93d9ccaf34eb5c38478ba0a5738e9 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Raw.pm
+++ b/lib/LaTeX/TikZ/Set/Raw.pm
@@ -27,7 +27,7 @@ has 'content' => (
 
 sub path { $_[0]->content }
 
-use LaTeX::TikZ::API raw => sub {
+use LaTeX::TikZ::Interface raw => sub {
  shift;
 
  __PACKAGE__->new(content => join ' ', @_);

diff --git a/lib/LaTeX/TikZ/Set/Rectangle.pm b/lib/LaTeX/TikZ/Set/Rectangle.pm
index 0c35c9d40a6c5eb9b17593f86925b8a16408e804..88af295a570f21ec08cab917a3044279e7f7595d 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Rectangle.pm
+++ b/lib/LaTeX/TikZ/Set/Rectangle.pm
@@ -77,7 +77,7 @@ Attributes 'width' and 'height' are required when 'to' was not given
  $class->$orig(@_);
 };
 
-use LaTeX::TikZ::API rectangle => sub {
+use LaTeX::TikZ::Interface rectangle => sub {
  shift;
  my ($p, $q) = @_;
 

diff --git a/lib/LaTeX/TikZ/Set/Sequence.pm b/lib/LaTeX/TikZ/Set/Sequence.pm
index a430fe5415fdc1894a619f49fac87942bba2aac6..fe32f1441bdcac28e7bac6a0bdb07ae606ec9a24 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Sequence.pm
+++ b/lib/LaTeX/TikZ/Set/Sequence.pm
@@ -64,7 +64,7 @@ sub draw {
    $set->kids;
 }
 
-use LaTeX::TikZ::API seq => sub {
+use LaTeX::TikZ::Interface seq => sub {
  shift;
 
  __PACKAGE__->new(kids => \@_);

diff --git a/t/00-load.t b/t/00-load.t
index 2825ca77d1052c361b7440f7ba7c81aabe7c84f7..301e30781fc0c7ba86c8903b1fc17724dfd0b0b4 100644 (file)
--- a/t/00-load.t
+++ b/t/00-load.t
@@ -7,8 +7,8 @@ use Test::More tests => 27;
 
 BEGIN {
  use_ok( 'LaTeX::TikZ' );
- use_ok( 'LaTeX::TikZ::API' );
  use_ok( 'LaTeX::TikZ::Formatter' );
+ use_ok( 'LaTeX::TikZ::Interface' );
  use_ok( 'LaTeX::TikZ::Mod' );
  use_ok( 'LaTeX::TikZ::Mod::Clip' );
  use_ok( 'LaTeX::TikZ::Mod::Color' );

diff --git a/t/01-api.t b/t/01-api.t
index 6bcada79c7e08b35966eee0235540e88aa923ee8..7a29a363103657c96de02cff8b93f8f341f03120 100644 (file)
--- 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,
  );