initial commit

12 files changed, 133 insertions, 0 deletions

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..8c897b7
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,9 @@
+cover_db
+META.yml
+Makefile
+blib
+inc
+pm_to_blib
+MANIFEST
+Makefile.old
+MANIFEST.SKIP
\ No newline at end of file
diff --git a/.shipit b/.shipit
new file mode 100644
index 0000000..e28b215
--- /dev/null
+++ b/.shipit
@@ -0,0 +1,6 @@
+steps = FindVersion, ChangeVersion, CheckChangeLog, DistTest, Commit, Tag, MakeDist
+git.tagpattern = release-%v
+git.push_to = release
+
+CheckChangeLog.files = Changes
+MakeDist.destination = ~/code/distribs/
diff --git a/Changes b/Changes
new file mode 100644
index 0000000..36a23fd
--- /dev/null
+++ b/Changes
@@ -0,0 +1,4 @@
+Revision history for Perl extension FeedDiscovery
+
+0.01    Wed Mar 10 17:37:28 2010
+        - original version
diff --git a/Makefile.PL b/Makefile.PL
new file mode 100644
index 0000000..7555734
--- /dev/null
+++ b/Makefile.PL
@@ -0,0 +1,18 @@
+use inc::Module::Install;
+name 'FeedDiscovery';
+all_from 'lib/FeedDiscovery.pm';
+readme_from 'lib/FeedDiscovery.pm';
+# requires '';
+requires 'Moose';
+requires 'Test::Class';
+requires 'Test::Exception';
+
+tests 't/*.t';
+
+build_requires 'Test::More';
+use_test_base;
+auto_include;
+#auto_include_deps;
+author_tests 'xt';
+auto_set_repository;
+WriteAll;
diff --git a/README b/README
new file mode 100644
index 0000000..835465d
--- /dev/null
+++ b/README
@@ -0,0 +1,17 @@
+NAME
+    FeedDiscovery -
+
+SYNOPSIS
+      use FeedDiscovery;
+
+DESCRIPTION
+    FeedDiscovery is
+
+AUTHOR
+    franck cuny <franck@lumberjaph.net>
+
+SEE ALSO
+LICENSE
+    This library is free software; you can redistribute it and/or modify it
+    under the same terms as Perl itself.
+
diff --git a/lib/FeedDiscovery.pm b/lib/FeedDiscovery.pm
new file mode 100644
index 0000000..94bb7aa
--- /dev/null
+++ b/lib/FeedDiscovery.pm
@@ -0,0 +1,32 @@
+package FeedDiscovery;
+
+use Moose;
+our $VERSION = '0.01';
+
+1;
+__END__
+
+=head1 NAME
+
+FeedDiscovery -
+
+=head1 SYNOPSIS
+
+  use FeedDiscovery;
+
+=head1 DESCRIPTION
+
+FeedDiscovery is
+
+=head1 AUTHOR
+
+franck cuny E<lt>franck@lumberjaph.netE<gt>
+
+=head1 SEE ALSO
+
+=head1 LICENSE
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.
+
+=cut
diff --git a/t/00_compile.t b/t/00_compile.t
new file mode 100644
index 0000000..6fac4e6
--- /dev/null
+++ b/t/00_compile.t
@@ -0,0 +1,4 @@
+use strict;
+use Test::More tests => 1;
+
+BEGIN { use_ok 'FeedDiscovery' }
diff --git a/xt/02_perlcritic.t b/xt/02_perlcritic.t
new file mode 100644
index 0000000..b977df8
--- /dev/null
+++ b/xt/02_perlcritic.t
@@ -0,0 +1,8 @@
+use strict;
+use Test::More;
+eval {
+    require Test::Perl::Critic;
+    Test::Perl::Critic->import( -profile => 'xt/perlcriticrc');
+};
+plan skip_all => "Test::Perl::Critic is not installed." if $@;
+all_critic_ok('lib');
diff --git a/xt/03_pod.t b/xt/03_pod.t
new file mode 100644
index 0000000..437887a
--- /dev/null
+++ b/xt/03_pod.t
@@ -0,0 +1,4 @@
+use Test::More;
+eval "use Test::Pod 1.00";
+plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
+all_pod_files_ok();
diff --git a/xt/perlcriticrc b/xt/perlcriticrc
new file mode 100644
index 0000000..fa96144
--- /dev/null
+++ b/xt/perlcriticrc
@@ -0,0 +1,2 @@
+[TestingAndDebugging::ProhibitNoStrict]
+allow=refs
diff --git a/xt/run.t b/xt/run.t
new file mode 100644
index 0000000..b5d1b71
--- /dev/null
+++ b/xt/run.t
@@ -0,0 +1,4 @@
+use lib 'xt/tests';
+use Test::FeedDiscovery;
+
+Test::Class->runtests;
diff --git a/xt/tests/Test/FeedDiscovery.pm b/xt/tests/Test/FeedDiscovery.pm
new file mode 100644
index 0000000..cf63b4b
--- /dev/null
+++ b/xt/tests/Test/FeedDiscovery.pm
@@ -0,0 +1,25 @@
+package Test::FeedDiscovery;
+
+use strict;
+use warnings;
+use base 'Test::Class';
+use Test::Exception;
+use Test::More;
+
+sub class { 'FeedDiscovery' }
+
+sub startup : Tests(startup => 1) {
+    my $test = shift;
+    use_ok $test->class, "use ok";
+}
+
+sub shutdown : Tests(shutdown) {
+    my $test = shift;
+}
+
+sub constructor : Tests(1) {
+    my $test = shift;
+    can_ok $test->class, 'new';
+}
+
+1;