[libcatmandu-perl] 01/46: rename commands/importers that list modules

Jonas Smedegaard dr at jones.dk
Tue Oct 14 13:52:51 UTC 2014


This is an automated email from the git hooks/post-receive script.

js pushed a commit to tag 0.9205
in repository libcatmandu-perl.

commit c5c9d2c3074dbfd69f1f114c269bf65ed70d8822
Author: Jakob Voss <voss at gbv.de>
Date:   Mon Jun 23 13:32:18 2014 +0200

    rename commands/importers that list modules
---
 .../Cmd/{exporter_info.pm => exporters.pm}         | 13 ++++-----
 lib/Catmandu/Cmd/{fix_info.pm => fixes.pm}         | 14 +++++-----
 .../Cmd/{importer_info.pm => importers.pm}         | 13 ++++-----
 lib/Catmandu/Cmd/{module_info.pm => modules.pm}    | 14 +++++-----
 lib/Catmandu/Cmd/{store_info.pm => stores.pm}      | 13 ++++-----
 .../Importer/{ExporterInfo.pm => Exporters.pm}     | 18 ++++++++----
 lib/Catmandu/Importer/{FixInfo.pm => Fixes.pm}     | 10 +++----
 .../Importer/{ImporterInfo.pm => Importers.pm}     | 10 +++----
 .../Importer/{ModuleInfo.pm => Modules.pm}         | 32 ++++++++++++++--------
 lib/Catmandu/Importer/{StoreInfo.pm => Stores.pm}  | 11 ++++----
 10 files changed, 80 insertions(+), 68 deletions(-)

diff --git a/lib/Catmandu/Cmd/exporter_info.pm b/lib/Catmandu/Cmd/exporters.pm
similarity index 84%
rename from lib/Catmandu/Cmd/exporter_info.pm
rename to lib/Catmandu/Cmd/exporters.pm
index b3388c4..131eda3 100644
--- a/lib/Catmandu/Cmd/exporter_info.pm
+++ b/lib/Catmandu/Cmd/exporters.pm
@@ -1,8 +1,8 @@
-package Catmandu::Cmd::exporter_info;
+package Catmandu::Cmd::exporters;
 
 use Catmandu::Sane;
 use parent 'Catmandu::Cmd';
-use Catmandu::Importer::ExporterInfo;
+use Catmandu::Importer::Exporters;
 
 sub command_opt_spec {
     (
@@ -18,7 +18,7 @@ sub command {
     for my $key (qw(inc)) {
         $from_opts->{$key} = $opts->$key if defined $opts->$key;
     }
-    my $from = Catmandu::Importer::ExporterInfo->new($from_opts);
+    my $from = Catmandu::Importer::Exporters->new($from_opts);
 
     my $into_args = [];
     my $into_opts = {};
@@ -51,15 +51,14 @@ sub command {
     }
 }
 
-1;
-
 =head1 NAME
 
-Catmandu::Cmd::exporter_info - list installed Catmandu exporters
+Catmandu::Cmd::exporters - list installed Catmandu exporters
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ExporterInfo>
+L<Catmandu::Importer::Exporters>
 
 =cut
 
+1;
diff --git a/lib/Catmandu/Cmd/fix_info.pm b/lib/Catmandu/Cmd/fixes.pm
similarity index 85%
rename from lib/Catmandu/Cmd/fix_info.pm
rename to lib/Catmandu/Cmd/fixes.pm
index a815186..244a622 100644
--- a/lib/Catmandu/Cmd/fix_info.pm
+++ b/lib/Catmandu/Cmd/fixes.pm
@@ -1,8 +1,8 @@
-package Catmandu::Cmd::fix_info;
+package Catmandu::Cmd::fixes;
 
 use Catmandu::Sane;
 use parent 'Catmandu::Cmd';
-use Catmandu::Importer::FixInfo;
+use Catmandu::Importer::Fixes;
 
 sub command_opt_spec {
     (
@@ -18,7 +18,7 @@ sub command {
     for my $key (qw(inc)) {
         $from_opts->{$key} = $opts->$key if defined $opts->$key;
     }
-    my $from = Catmandu::Importer::FixInfo->new($from_opts);
+    my $from = Catmandu::Importer::Fixes->new($from_opts);
 
     my $into_args = [];
     my $into_opts = {};
@@ -51,14 +51,14 @@ sub command {
     }
 }
 
-1;
-
 =head1 NAME
 
-Catmandu::Cmd::fix_info - list installed Catmandu fixes
+Catmandu::Cmd::fixes - list installed Catmandu fixes
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::FixInfo>
+L<Catmandu::Importer::Fixes>
 
 =cut
+
+1;
diff --git a/lib/Catmandu/Cmd/importer_info.pm b/lib/Catmandu/Cmd/importers.pm
similarity index 84%
rename from lib/Catmandu/Cmd/importer_info.pm
rename to lib/Catmandu/Cmd/importers.pm
index 33ccbda..7a52b5c 100644
--- a/lib/Catmandu/Cmd/importer_info.pm
+++ b/lib/Catmandu/Cmd/importers.pm
@@ -1,8 +1,8 @@
-package Catmandu::Cmd::importer_info;
+package Catmandu::Cmd::importers;
 
 use Catmandu::Sane;
 use parent 'Catmandu::Cmd';
-use Catmandu::Importer::ImporterInfo;
+use Catmandu::Importer::Importers;
 
 sub command_opt_spec {
     (
@@ -18,7 +18,7 @@ sub command {
     for my $key (qw(inc)) {
         $from_opts->{$key} = $opts->$key if defined $opts->$key;
     }
-    my $from = Catmandu::Importer::ImporterInfo->new($from_opts);
+    my $from = Catmandu::Importer::Importers->new($from_opts);
 
     my $into_args = [];
     my $into_opts = {};
@@ -51,15 +51,14 @@ sub command {
     }
 }
 
-1;
-
 =head1 NAME
 
-Catmandu::Cmd::importer_info - list installed Catmandu importers
+Catmandu::Cmd::importers - list installed Catmandu importers
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ImporterInfo>
+L<Catmandu::Importer::Importers>
 
 =cut
 
+1;
diff --git a/lib/Catmandu/Cmd/module_info.pm b/lib/Catmandu/Cmd/modules.pm
similarity index 85%
rename from lib/Catmandu/Cmd/module_info.pm
rename to lib/Catmandu/Cmd/modules.pm
index f617c5e..2ec2294 100644
--- a/lib/Catmandu/Cmd/module_info.pm
+++ b/lib/Catmandu/Cmd/modules.pm
@@ -1,8 +1,8 @@
-package Catmandu::Cmd::module_info;
+package Catmandu::Cmd::modules;
 
 use Catmandu::Sane;
 use parent 'Catmandu::Cmd';
-use Catmandu::Importer::ModuleInfo;
+use Catmandu::Importer::Modules;
 
 sub command_opt_spec {
     (
@@ -20,7 +20,7 @@ sub command {
     for my $key (qw(namespace max_depth inc)) {
         $from_opts->{$key} = $opts->$key if defined $opts->$key;
     }
-    my $from = Catmandu::Importer::ModuleInfo->new($from_opts);
+    my $from = Catmandu::Importer::Modules->new($from_opts);
 
     my $into_args = [];
     my $into_opts = {};
@@ -53,14 +53,14 @@ sub command {
     }
 }
 
-1;
-
 =head1 NAME
 
-Catmandu::Cmd::module_info - list installed perl modules in a given namespace
+Catmandu::Cmd::modules - list installed perl modules in a given namespace
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ModuleInfo>
+L<Catmandu::Importer::Modules>
 
 =cut
+
+1;
diff --git a/lib/Catmandu/Cmd/store_info.pm b/lib/Catmandu/Cmd/stores.pm
similarity index 85%
rename from lib/Catmandu/Cmd/store_info.pm
rename to lib/Catmandu/Cmd/stores.pm
index 8feba4c..028b73d 100644
--- a/lib/Catmandu/Cmd/store_info.pm
+++ b/lib/Catmandu/Cmd/stores.pm
@@ -1,8 +1,8 @@
-package Catmandu::Cmd::store_info;
+package Catmandu::Cmd::stores;
 
 use Catmandu::Sane;
 use parent 'Catmandu::Cmd';
-use Catmandu::Importer::StoreInfo;
+use Catmandu::Importer::Stores;
 
 sub command_opt_spec {
     (
@@ -18,7 +18,7 @@ sub command {
     for my $key (qw(inc)) {
         $from_opts->{$key} = $opts->$key if defined $opts->$key;
     }
-    my $from = Catmandu::Importer::StoreInfo->new($from_opts);
+    my $from = Catmandu::Importer::Stores->new($from_opts);
 
     my $into_args = [];
     my $into_opts = {};
@@ -51,16 +51,15 @@ sub command {
     }
 }
 
-1;
-
 =head1 NAME
 
-Catmandu::Cmd::store_info - list installed Catmandu stores
+Catmandu::Cmd::stores - list installed Catmandu stores
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::StoreInfo>
+L<Catmandu::Importer::Stores>
 
 =cut
 
+1;
 
diff --git a/lib/Catmandu/Importer/ExporterInfo.pm b/lib/Catmandu/Importer/Exporters.pm
similarity index 62%
rename from lib/Catmandu/Importer/ExporterInfo.pm
rename to lib/Catmandu/Importer/Exporters.pm
index c2a37a4..e2794c4 100644
--- a/lib/Catmandu/Importer/ExporterInfo.pm
+++ b/lib/Catmandu/Importer/Exporters.pm
@@ -1,8 +1,8 @@
-package Catmandu::Importer::ExporterInfo;
+package Catmandu::Importer::Exporters;
 
 use Catmandu::Sane;
 use Moo;
-use Catmandu::Importer::ModuleInfo;
+use Catmandu::Importer::Modules;
 
 has inc => (
     is      => 'ro',
@@ -18,7 +18,7 @@ has _module_info => (
 
 sub _build_module_info {
     my ($self) = @_;
-    Catmandu::Importer::ModuleInfo->new(
+    Catmandu::Importer::Modules->new(
         namespace => 'Catmandu::Exporter',
         inc       => $self->inc,
         max_depth => 1,
@@ -27,15 +27,21 @@ sub _build_module_info {
 
 =head1 NAME
 
-Catmandu::Importer::ExporterInfo - list installed Catmandu exporters
+Catmandu::Importer::Exporters - list installed Catmandu exporters
 
 =head1 OPTIONS
 
-    inc: list of library paths (defaults to @INC)
+=over
+
+=item inc
+
+list of library paths (defaults to @INC)
+
+=back
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ModuleInfo>
+L<Catmandu::Importer::Modules>
 
 =cut
 
diff --git a/lib/Catmandu/Importer/FixInfo.pm b/lib/Catmandu/Importer/Fixes.pm
similarity index 70%
rename from lib/Catmandu/Importer/FixInfo.pm
rename to lib/Catmandu/Importer/Fixes.pm
index 875df1a..0dd9413 100644
--- a/lib/Catmandu/Importer/FixInfo.pm
+++ b/lib/Catmandu/Importer/Fixes.pm
@@ -1,8 +1,8 @@
-package Catmandu::Importer::FixInfo;
+package Catmandu::Importer::Fixes;
 
 use Catmandu::Sane;
 use Moo;
-use Catmandu::Importer::ModuleInfo;
+use Catmandu::Importer::Modules;
 
 has inc => (
     is      => 'ro',
@@ -18,7 +18,7 @@ has _module_info => (
 
 sub _build_module_info {
     my ($self) = @_;
-    Catmandu::Importer::ModuleInfo->new(
+    Catmandu::Importer::Modules->new(
         namespace => 'Catmandu::Fix',
         inc       => $self->inc,
         pattern   => qr/:[a-z][^:]*$/,
@@ -27,7 +27,7 @@ sub _build_module_info {
 
 =head1 NAME
 
-Catmandu::Importer::FixInfo - list installed Catmandu fixes
+Catmandu::Importer::Fixes - list installed Catmandu fixes
 
 =head1 OPTIONS
 
@@ -35,7 +35,7 @@ Catmandu::Importer::FixInfo - list installed Catmandu fixes
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ModuleInfo>
+L<Catmandu::Importer::Modules>
 
 =cut
 
diff --git a/lib/Catmandu/Importer/ImporterInfo.pm b/lib/Catmandu/Importer/Importers.pm
similarity index 69%
rename from lib/Catmandu/Importer/ImporterInfo.pm
rename to lib/Catmandu/Importer/Importers.pm
index 1e4cd66..35254f3 100644
--- a/lib/Catmandu/Importer/ImporterInfo.pm
+++ b/lib/Catmandu/Importer/Importers.pm
@@ -1,8 +1,8 @@
-package Catmandu::Importer::ImporterInfo;
+package Catmandu::Importer::Importers;
 
 use Catmandu::Sane;
 use Moo;
-use Catmandu::Importer::ModuleInfo;
+use Catmandu::Importer::Modules;
 
 has inc => (
     is      => 'ro',
@@ -18,7 +18,7 @@ has _module_info => (
 
 sub _build_module_info {
     my ($self) = @_;
-    Catmandu::Importer::ModuleInfo->new(
+    Catmandu::Importer::Modules->new(
         namespace => 'Catmandu::Importer',
         inc       => $self->inc,
         max_depth => 1,
@@ -27,7 +27,7 @@ sub _build_module_info {
 
 =head1 NAME
 
-Catmandu::Importer::ImporterInfo - list installed Catmandu importers
+Catmandu::Importer::Importers - list installed Catmandu importers
 
 =head1 OPTIONS
 
@@ -35,7 +35,7 @@ Catmandu::Importer::ImporterInfo - list installed Catmandu importers
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ModuleInfo>
+L<Catmandu::Importer::Modules>
 
 =cut
 
diff --git a/lib/Catmandu/Importer/ModuleInfo.pm b/lib/Catmandu/Importer/Modules.pm
similarity index 76%
rename from lib/Catmandu/Importer/ModuleInfo.pm
rename to lib/Catmandu/Importer/Modules.pm
index da46b55..fe152f7 100644
--- a/lib/Catmandu/Importer/ModuleInfo.pm
+++ b/lib/Catmandu/Importer/Modules.pm
@@ -1,4 +1,4 @@
-package Catmandu::Importer::ModuleInfo;
+package Catmandu::Importer::Modules;
 
 use namespace::clean;
 use Catmandu::Sane;
@@ -80,21 +80,31 @@ sub generator {
 
 =head1 NAME
 
-    Catmandu::Importer::ModuleInfo - list installed perl modules in a given namespace
+Catmandu::Importer::Modules - list installed perl modules in a given namespace
 
 =head1 OPTIONS
 
-    namespace: namespace for the packages to list
-    inc:       list of library paths (defaults to @INC)
-    max_depth: maximum depth to recurse into the namespace
-               e.g. if the namespace is Catmandu::Fix then
-               Catmandu::Fix::add_field has a depth of 1 and
-               Catmandu::Fix::Condition::exists a depth of 2
-    pattern:   filter modules by the given regex pattern
+=over
 
-=head1 SEE ALSO
+=item namespace
 
-    L<Catmandu::Importer::ModuleInfo>
+namespace for the packages to list
+
+=item inc
+
+list of library paths (defaults to C<@INC>)
+
+=item max_depth
+
+maximum depth to recurse into the namespace e.g. if the namespace is
+Catmandu::Fix then Catmandu::Fix::add_field has a depth of 1 and
+Catmandu::Fix::Condition::exists a depth of 2
+
+=item pattern
+
+filter modules by the given regex pattern
+
+=back
 
 =cut
 
diff --git a/lib/Catmandu/Importer/StoreInfo.pm b/lib/Catmandu/Importer/Stores.pm
similarity index 69%
rename from lib/Catmandu/Importer/StoreInfo.pm
rename to lib/Catmandu/Importer/Stores.pm
index 3a0764b..306b2c5 100644
--- a/lib/Catmandu/Importer/StoreInfo.pm
+++ b/lib/Catmandu/Importer/Stores.pm
@@ -1,8 +1,8 @@
-package Catmandu::Importer::StoreInfo;
+package Catmandu::Importer::Stores;
 
 use Catmandu::Sane;
 use Moo;
-use Catmandu::Importer::ModuleInfo;
+use Catmandu::Importer::Modules;
 
 has inc => (
     is      => 'ro',
@@ -18,7 +18,7 @@ has _module_info => (
 
 sub _build_module_info {
     my ($self) = @_;
-    Catmandu::Importer::ModuleInfo->new(
+    Catmandu::Importer::Modules->new(
         namespace => 'Catmandu::Store',
         inc       => $self->inc,
         max_depth => 1,
@@ -27,7 +27,7 @@ sub _build_module_info {
 
 =head1 NAME
 
-Catmandu::Importer::StoreInfo - list installed Catmandu stores
+Catmandu::Importer::Stores - list installed Catmandu stores
 
 =head1 OPTIONS
 
@@ -35,9 +35,8 @@ Catmandu::Importer::StoreInfo - list installed Catmandu stores
 
 =head1 SEE ALSO
 
-    L<Catmandu::Importer::ModuleInfo>
+L<Catmandu::Importer::Modules>
 
 =cut
 
 1;
-

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcatmandu-perl.git



More information about the Pkg-perl-cvs-commits mailing list