[Bps-public-commit] log-log4perl-appender-gearman branch, master, updated. a96dfb06dcccc1aba4c5611cb834280bbf32fb11

Chia-liang Kao clkao at bestpractical.com
Sat Oct 9 11:15:43 EDT 2010


The branch, master has been updated
       via  a96dfb06dcccc1aba4c5611cb834280bbf32fb11 (commit)
      from  5b98254fa518398ea30bb4587648c4f2f875d24a (commit)

Summary of changes:
 .gitignore                           |    7 ++++
 .shipit                              |    2 +
 Changes                              |    3 +-
 MANIFEST                             |   23 ++++++++++++
 Makefile.PL                          |   33 ++++++-----------
 README                               |   52 ---------------------------
 lib/Log/Log4perl/Appender/Gearman.pm |   64 +++++++---------------------------
 t/basic.t                            |    8 +++--
 xt/perlcritic.t                      |    5 +++
 xt/pod.t                             |    4 ++
 xt/podspell.t                        |   14 +++++++
 xt/synopsis.t                        |    4 ++
 12 files changed, 91 insertions(+), 128 deletions(-)
 create mode 100644 .shipit
 delete mode 100644 README
 create mode 100644 xt/perlcritic.t
 create mode 100644 xt/pod.t
 create mode 100644 xt/podspell.t
 create mode 100644 xt/synopsis.t

- Log -----------------------------------------------------------------
commit a96dfb06dcccc1aba4c5611cb834280bbf32fb11
Author: Chia-liang Kao <clkao at clkao.org>
Date:   Sat Oct 9 23:19:06 2010 +0800

    Checking in changes prior to tagging of version 0.29.  Changelog diff is:
    
    diff --git a/Changes b/Changes
    index 02e251d..4ab2783 100644
    --- a/Changes
    +++ b/Changes
    @@ -1,5 +1,6 @@
     Revision history for Log-Log4perl-Appender-Gearman
    
    -0.01    Date/time
    +0.29    Sat Oct  9 23:01:05 CST 2010
    +
             First version, released on an unsuspecting world.

diff --git a/.gitignore b/.gitignore
index e69de29..2116aef 100644
--- a/.gitignore
+++ b/.gitignore
@@ -0,0 +1,7 @@
+META.yml
+Makefile
+inc/
+pm_to_blib
+*~
+*.log
+t/*.pid
diff --git a/.shipit b/.shipit
new file mode 100644
index 0000000..d2778c7
--- /dev/null
+++ b/.shipit
@@ -0,0 +1,2 @@
+steps = FindVersion, ChangeVersion, CheckChangeLog, DistTest, Commit, Tag, MakeDist, UploadCPAN
+git.push_to = origin
diff --git a/Changes b/Changes
index 02e251d..4ab2783 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,6 @@
 Revision history for Log-Log4perl-Appender-Gearman
 
-0.01    Date/time
+0.29    Sat Oct  9 23:01:05 CST 2010
+
         First version, released on an unsuspecting world.
 
diff --git a/MANIFEST b/MANIFEST
index 332b0e5..cfc6f3a 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -1,6 +1,29 @@
+.shipit
+bin/gearman-logger
 Changes
+gt-debug.log
+gt-order.log
+gt.log
+inc/Module/Install.pm
+inc/Module/Install/AuthorTests.pm
+inc/Module/Install/Base.pm
+inc/Module/Install/Can.pm
+inc/Module/Install/Fetch.pm
+inc/Module/Install/Include.pm
+inc/Module/Install/Makefile.pm
+inc/Module/Install/Metadata.pm
+inc/Module/Install/ReadmeFromPod.pm
+inc/Module/Install/Repository.pm
+inc/Module/Install/Win32.pm
+inc/Module/Install/WriteAll.pm
 lib/Log/Log4perl/Appender/Gearman.pm
 Makefile.PL
 MANIFEST			This list of files
+META.yml
 README
 t/basic.t
+t/gearmand.pid
+xt/perlcritic.t
+xt/pod.t
+xt/podspell.t
+xt/synopsis.t
diff --git a/Makefile.PL b/Makefile.PL
index abc45a6..b137548 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -1,21 +1,12 @@
-use strict;
-use warnings;
-use ExtUtils::MakeMaker;
-
-WriteMakefile(
-    NAME                => 'Log::Log4perl::Appender::Gearman',
-    AUTHOR              => 'Chia-liang Kao <clako at clkao.org>',
-    VERSION_FROM        => 'lib/Log/Log4perl/Appender/Gearman.pm',
-    ABSTRACT_FROM       => 'lib/Log/Log4perl/Appender/Gearman.pm',
-    ($ExtUtils::MakeMaker::VERSION >= 6.3002
-      ? ('LICENSE'=> 'perl')
-      : ()),
-    PL_FILES            => {},
-    PREREQ_PM => {
-        'Test::More'      => 0,
-        'Gearman::Client' => 0,
-        'Log::Log4perl'   => 0,
-    },
-    dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
-    clean               => { FILES => 'Log-Log4perl-Appender-Gearman-*' },
-);
+sub readme_from {}; sub auto_include_deps {}; sub author_tests {}; sub auto_set_repository {};
+use inc::Module::Install;
+name 'Log-Log4perl-Appender-Gearman';
+all_from 'lib/Log/Log4perl/Appender/Gearman.pm',
+readme_from 'lib/Log/Log4perl/Appender/Gearman.pm',
+build_requires 'Test::More';
+requires 'Gearman::Client';
+requires 'Log::Log4perl';
+auto_include_deps;
+author_tests('xt');
+auto_set_repository;
+WriteAll;
diff --git a/README b/README
deleted file mode 100644
index 2c7c278..0000000
--- a/README
+++ /dev/null
@@ -1,52 +0,0 @@
-Log-Log4perl-Appender-Gearman
-
-The README is used to introduce the module and provide instructions on
-how to install the module, any machine dependencies it may have (for
-example C compilers and installed libraries) and any other information
-that should be provided before the module is installed.
-
-A README file is required for CPAN modules since CPAN extracts the README
-file from a module distribution so that people browsing the archive
-can use it to get an idea of the module's uses. It is usually a good idea
-to provide version information here so that people can decide whether
-fixes for the module are worth downloading.
-
-
-INSTALLATION
-
-To install this module, run the following commands:
-
-	perl Makefile.PL
-	make
-	make test
-	make install
-
-SUPPORT AND DOCUMENTATION
-
-After installing, you can find documentation for this module with the
-perldoc command.
-
-    perldoc Log::Log4perl::Appender::Gearman
-
-You can also look for information at:
-
-    RT, CPAN's request tracker
-        http://rt.cpan.org/NoAuth/Bugs.html?Dist=Log-Log4perl-Appender-Gearman
-
-    AnnoCPAN, Annotated CPAN documentation
-        http://annocpan.org/dist/Log-Log4perl-Appender-Gearman
-
-    CPAN Ratings
-        http://cpanratings.perl.org/d/Log-Log4perl-Appender-Gearman
-
-    Search CPAN
-        http://search.cpan.org/dist/Log-Log4perl-Appender-Gearman/
-
-
-COPYRIGHT AND LICENCE
-
-Copyright (C) 2009 Chia-liang Kao
-
-This program is free software; you can redistribute it and/or modify it
-under the same terms as Perl itself.
-
diff --git a/lib/Log/Log4perl/Appender/Gearman.pm b/lib/Log/Log4perl/Appender/Gearman.pm
index 0288713..f255ce0 100644
--- a/lib/Log/Log4perl/Appender/Gearman.pm
+++ b/lib/Log/Log4perl/Appender/Gearman.pm
@@ -3,12 +3,14 @@ package Log::Log4perl::Appender::Gearman;
 use warnings;
 use strict;
 
+use 5.8.8;
+
 use base 'Log::Log4perl::Appender';
 use Gearman::Client;
 
 =head1 NAME
 
-Log::Log4perl::Appender::Gearman - The great new Log::Log4perl::Appender::Gearman!
+Log::Log4perl::Appender::Gearman - Log appender for posting job to gearman
 
 =head1 VERSION
 
@@ -16,28 +18,17 @@ Version 0.01
 
 =cut
 
-our $VERSION = '0.01';
+our $VERSION = '0.29';
 
 
 =head1 SYNOPSIS
 
-Quick summary of what the module does.
-
-Perhaps a little code snippet.
-
-    use Log::Log4perl::Appender::Gearman;
-
-    my $foo = Log::Log4perl::Appender::Gearman->new();
-    ...
-
-=head1 EXPORT
-
-A list of functions that can be exported.  You can delete this section
-if you don't export anything, such as for a purely object-oriented module.
-
-=head1 FUNCTIONS
-
-=head2 function1
+  # in your log4perl config:
+  # log4perl.appender.GM          = Log::Log4perl::Appender::Gearman
+  # log4perl.appender.GM.job_servers = 127.0.0.1:$port
+  # log4perl.appender.GM.jobname = logme
+  # log4perl.appender.GM.layout = Log::Log4perl::Layout::PatternLayout
+  # log4perl.appender.GM.layout.ConversionPattern=%m
 
 =cut
 
@@ -81,7 +72,7 @@ sub log {
 
 =head1 AUTHOR
 
-Chia-liang Kao, C<< <clako at clkao.org> >>
+Chia-liang Kao, C<< <clkao at clkao.org> >>
 
 =head1 BUGS
 
@@ -92,42 +83,13 @@ automatically be notified of progress on your bug as I make changes.
 
 
 
-=head1 SUPPORT
-
-You can find documentation for this module with the perldoc command.
-
-    perldoc Log::Log4perl::Appender::Gearman
-
-
-You can also look for information at:
-
-=over 4
-
-=item * RT: CPAN's request tracker
-
-L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Log-Log4perl-Appender-Gearman>
-
-=item * AnnoCPAN: Annotated CPAN documentation
-
-L<http://annocpan.org/dist/Log-Log4perl-Appender-Gearman>
-
-=item * CPAN Ratings
-
-L<http://cpanratings.perl.org/d/Log-Log4perl-Appender-Gearman>
-
-=item * Search CPAN
-
-L<http://search.cpan.org/dist/Log-Log4perl-Appender-Gearman/>
-
-=back
-
 
 =head1 ACKNOWLEDGEMENTS
 
 
 =head1 COPYRIGHT & LICENSE
 
-Copyright 2009 Chia-liang Kao, all rights reserved.
+Copyright 2009-2010 Chia-liang Kao, all rights reserved.
 
 This program is free software; you can redistribute it and/or modify it
 under the same terms as Perl itself.
@@ -135,4 +97,4 @@ under the same terms as Perl itself.
 
 =cut
 
-1; # End of Log::Log4perl::Appender::Gearman
+1;
diff --git a/t/basic.t b/t/basic.t
index 9b0e221..adf5f1d 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 use strict;
-use Test::More tests => 2;
+use Test::More;
 use Log::Log4perl;
 use File::Spec;
 use Gearman::Worker;
@@ -18,10 +18,10 @@ log4perl.appender.GM.layout = Log::Log4perl::Layout::PatternLayout
 log4perl.appender.GM.layout.ConversionPattern=%m
 
 );
-ok(Log::Log4perl::init( \$conf ));
 
 my @received;
 start_gearmand($port);
+ok(Log::Log4perl::init( \$conf ));
 
 my $worker = Gearman::Worker->new;
 $worker->job_servers("127.0.0.1:$port");
@@ -46,7 +46,7 @@ sub start_gearmand {
     my $port = shift;
     my $gearmand_pid;
     my $gearmand = can_run('gearmand')
-        or die "Can't find gearmand";
+        or plan skip_all => "Can't find gearmand";
 
     system($gearmand, -p => $port, '-d', '--pidfile' => abs_path("t/gearmand.pid"));
     die $! if $?;
@@ -79,3 +79,5 @@ sub can_run {
 
     return;
 }
+
+done_testing;
diff --git a/xt/perlcritic.t b/xt/perlcritic.t
new file mode 100644
index 0000000..950f64f
--- /dev/null
+++ b/xt/perlcritic.t
@@ -0,0 +1,5 @@
+use strict;
+use Test::More;
+eval q{ use Test::Perl::Critic };
+plan skip_all => "Test::Perl::Critic is not installed." if $@;
+all_critic_ok("lib");
diff --git a/xt/pod.t b/xt/pod.t
new file mode 100644
index 0000000..437887a
--- /dev/null
+++ b/xt/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/podspell.t b/xt/podspell.t
new file mode 100644
index 0000000..cd279c4
--- /dev/null
+++ b/xt/podspell.t
@@ -0,0 +1,14 @@
+use Test::More;
+eval q{ use Test::Spelling };
+plan skip_all => "Test::Spelling is not installed." if $@;
+add_stopwords(<DATA>);
+set_spell_cmd("aspell -l en list");
+all_pod_files_spelling_ok('lib');
+__DATA__
+Chia
+liang
+Kao
+AnnoCPAN
+CPAN
+appender
+gearman
diff --git a/xt/synopsis.t b/xt/synopsis.t
new file mode 100644
index 0000000..07aa750
--- /dev/null
+++ b/xt/synopsis.t
@@ -0,0 +1,4 @@
+use Test::More;
+eval "use Test::Synopsis";
+plan skip_all => "Test::Synopsis required" if $@;
+all_synopsis_ok();

-----------------------------------------------------------------------



More information about the Bps-public-commit mailing list