Prepare for a CPAN Release

Changes

@@ -1,54 +1,31 @@
 Revision history for Perl extension POE::Component::IRC.
 
-6.13
-    - BotCommand.pm: Strip colors/formatting before processing (Hinrik)
-
-6.12
-    - Depend on latest (1.24) POE::Component::Pluggable (Hinrik)
 
-6.11_01 Wed Aug 19 10:06:07 BST 2009
+6.12  Thu Sep 10 09:25:02 BST 2009
     - Fix localaddr() issue reported in RT #48791 by Michael Andreen
+    - Depend on latest (1.24) POE::Component::Pluggable (Hinrik)
+    - BotCommand.pm: Strip colors/formatting before processing (Hinrik)
+    - Plugin::AutoJoin S_join should return PCI_EAT_NONE if 
+      $joiner ne $irc->nick_name() (perigrin)
 
 6.10 Fri Aug 14 21:19:07 BST 2009
-    - Time for a stable release
-
-6.09_11 Fri Aug  7 13:18:02 BST 2009
-    - Mark one of the netsplit tests TODO (bingos)
-
-6.09_10 Thu Jul 30 11:48:11 BST 2009
-    - Added some diagnostics to the netsplit test. (bingos)
-
-6.09_09 Wed Jul 29 12:02:13 BST 2009
-    - Refactored the netsplit test slightly to try and eliminate 
-      race conditions (bingos)
-
-6.09_08 Mon Jul 27 12:40:19 BST 2009
-    - State and subclasses will use NAMES replies to synchronise
-      channel state as well now. Should help RT #46825 (bingos).
-
-6.09_07 Tue Jul 21 07:07:16 BST 2009
+    - Implemented netsplit detection and handling of state on netjoin (bingos)
+    - Refactored the netsplit code for robustness and sanity (bingos)
+    - Added testcase for netsplit handling (bingos)
     - AutoJoin.pm: Fixed problem with rejoining password-protected channels
       that were not passed to the plugin constructor (Hinrik)
     - Removed extended debug output from some tests, they've been behaving
       for a while (Hinrik)
-
-6.09_06 Fri Jul 17 11:02:45 BST 2009
+    - State and subclasses will use NAMES replies to synchronise
+      channel state as well now. Should help RT #46825 (bingos).
+    - Refactored the netsplit test slightly to try and eliminate 
+      race conditions (bingos)
     - Added netsplit detection code to Qnet::State subclass. (bingos)
-
-6.09_05 Thu Jul 16 15:09:38 BST 2009
     - Netsplit restoration now triggers irc_nick_sync event (bingos)
-
-6.09_04 Sun Jul 12 21:41:30 BST 2009
+    - Added some diagnostics to the netsplit test. (bingos)
     - Markup test in netsplit as todo due to race condition (bingos)
-
-6.09_03 Fri Jul 10 15:09:05 BST 2009
-    - Added testcase for netsplit handling (bingos)
-
-6.09_02 Fri Jul 10 10:04:18 BST 2009
-    - Refactored the netsplit code for robustness and sanity (bingos)
-
-6.09_01 Thu Jul  9 21:06:22 BST 2009
-    - Implemented netsplit detection and handling of state on netjoin (bingos)
+    - Mark one of the netsplit tests TODO (bingos)
+    - Time for a stable release
 
 6.08 Fri May 29 11:46:45 GMT 2009
     - CTCP.pm: Return an RFC822 date in response to CTCP TIME (Hinrik)

MANIFEST

@@ -22,11 +22,11 @@ inc/Module/Install/AuthorTests.pm
 inc/Module/Install/Base.pm
 inc/Module/Install/Can.pm
 inc/Module/Install/Fetch.pm
+inc/Module/Install/GithubMeta.pm
 inc/Module/Install/Makefile.pm
 inc/Module/Install/Metadata.pm
 inc/Module/Install/Win32.pm
 inc/Module/Install/WriteAll.pm
-inc/Module/Install/GithubMeta.pm
 lib/POE/Component/IRC.pm
 lib/POE/Component/IRC/Common.pm
 lib/POE/Component/IRC/Constants.pm
@@ -67,7 +67,6 @@ Makefile.PL
 MANIFEST			This list of files
 META.yml
 README
-TODO
 t/01_base/01_compile.t
 t/01_base/02_filters.t
 t/01_base/03_common.t
@@ -146,6 +145,7 @@ t/inc/POE/Component/Server/IRC/Common.pm
 t/inc/POE/Component/Server/IRC/OperServ.pm
 t/inc/POE/Component/Server/IRC/Pipeline.pm
 t/inc/POE/Component/Server/IRC/Plugin.pm
+TODO
 xt/perl_critic.t
 xt/perl_critic_t.t
 xt/perlcriticrc

Makefile.PL

@@ -2,16 +2,6 @@ use 5.006;
 use strict;
 use inc::Module::Install;
 
-my $GOT_DNS;
-
-BEGIN {
-   $GOT_DNS = 0;
-   eval {
-	require POE::Component::Client::DNS;
-	$GOT_DNS = 1 if $POE::Component::Client::DNS::VERSION >= 0.99;
-   };
-}
-
 print <<NOTICE;
 
 ---------------------------------------------------------------
@@ -21,7 +11,7 @@ is firewalled then these tests will fail.
 
 NOTICE
 
-_no_dns() unless $GOT_DNS;
+_no_dns() unless can_use('POE::Component::Client::DNS',0.99);
 
 name 'POE-Component-IRC';
 license 'perl';
@@ -41,7 +31,6 @@ requires 'POE::Filter::IRCD' => 1.7;
 requires 'Encode' => 0;
 requires 'Encode::Guess' => 0;
 test_requires 'Test::More' => '0.47';
-#tests 't/*.t t/*/*.t t/*/*/*.t';
 tests_recursive;
 author_tests 'xt';
 clean_files 'README.send Changes.resume followtail logger_test';

lib/POE/Component/IRC.pm

@@ -16,7 +16,7 @@ use POE::Component::IRC::Plugin::Whois;
 use Socket;
 use base qw(POE::Component::Pluggable);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 our ($GOT_SSL, $GOT_CLIENT_DNS, $GOT_SOCKET6, $GOT_ZLIB);
 
 BEGIN {

lib/POE/Component/IRC/Common.pm

@@ -5,7 +5,7 @@ use warnings;
 
 use Encode qw(decode);
 use Encode::Guess;
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 require Exporter;
 use base qw(Exporter);

lib/POE/Component/IRC/Constants.pm

@@ -3,7 +3,7 @@ package POE::Component::IRC::Constants;
 use strict;
 use warnings;
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 require Exporter;
 use base qw(Exporter);

lib/POE/Component/IRC/Plugin.pm

@@ -3,7 +3,7 @@ package POE::Component::IRC::Plugin;
 use strict;
 use warnings;
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 require Exporter;
 use base qw(Exporter);

lib/POE/Component/IRC/Plugin/AutoJoin.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE::Component::IRC::Plugin qw(:ALL);
 use POE::Component::IRC::Common qw(parse_user l_irc);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/BotAddressed.pm

@@ -5,7 +5,7 @@ use warnings;
 use Carp;
 use POE::Component::IRC::Plugin qw( :ALL );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/BotCommand.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE::Component::IRC::Common qw( parse_user strip_color strip_formatting );
 use POE::Component::IRC::Plugin qw( :ALL );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/BotTraffic.pm

@@ -6,7 +6,7 @@ use POE::Component::IRC::Plugin qw( :ALL );
 use POE::Filter::IRCD;
 use POE::Filter::IRC::Compat;
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = @_;

lib/POE/Component/IRC/Plugin/CTCP.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE::Component::IRC::Plugin qw( :ALL );
 use POSIX qw(strftime);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/Connector.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE;
 use POE::Component::IRC::Plugin qw( :ALL );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/Console.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE qw(Wheel::SocketFactory Wheel::ReadWrite Filter::IRCD Filter::Line Filter::Stackable);
 use POE::Component::IRC::Plugin qw( :ALL );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my $package = shift;

lib/POE/Component/IRC/Plugin/CycleEmpty.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE::Component::IRC::Plugin qw( :ALL );
 use POE::Component::IRC::Common qw( parse_user u_irc );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/DCC.pm

@@ -9,7 +9,7 @@ use POE qw(Driver::SysRW Filter::Line Filter::Stream
 use POE::Component::IRC::Plugin qw(:ALL);
 use Socket;
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 use constant {
     OUT_BLOCKSIZE  => 1024,   # Send DCC data in 1k chunks

lib/POE/Component/IRC/Plugin/FollowTail.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE qw(Wheel::FollowTail);
 use POE::Component::IRC::Plugin qw( :ALL );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/ISupport.pm

@@ -4,7 +4,7 @@ use strict;
 use warnings;
 use POE::Component::IRC::Plugin qw(:ALL);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     return bless { }, shift;

lib/POE/Component/IRC/Plugin/Logger.pm

@@ -12,7 +12,7 @@ use POE::Component::IRC::Plugin::BotTraffic;
 use POE::Component::IRC::Common qw( l_irc parse_user strip_color strip_formatting irc_to_utf8);
 use POSIX qw(strftime);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/NickReclaim.pm

@@ -5,7 +5,7 @@ use warnings;
 use Carp;
 use POE::Component::IRC::Plugin qw(:ALL);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/NickServID.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE::Component::IRC::Plugin qw( :ALL );
 use POE::Component::IRC::Common qw( u_irc );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/PlugMan.pm

@@ -6,7 +6,7 @@ use Carp;
 use POE::Component::IRC::Plugin qw( :ALL );
 use POE::Component::IRC::Common qw( matches_mask parse_user );
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 BEGIN { 
     # Turn on the debugger's symbol source tracing

lib/POE/Component/IRC/Plugin/Proxy.pm

@@ -8,7 +8,7 @@ use POE qw(Wheel::SocketFactory Wheel::ReadWrite Filter::IRCD
            Filter::Line Filter::Stackable);
 use POE::Component::IRC::Plugin qw(PCI_EAT_NONE);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package) = shift;

lib/POE/Component/IRC/Plugin/Whois.pm

@@ -6,7 +6,7 @@ use POE;
 use POE::Component::IRC::Plugin qw( PCI_EAT_NONE );
 use POE::Component::IRC::Common qw(:ALL);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     return bless { }, shift;

lib/POE/Component/IRC/Qnet.pm

@@ -7,7 +7,7 @@ use POE;
 use POE::Component::IRC::Constants qw(:ALL);
 use base qw(POE::Component::IRC);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub _create {
     my $self = shift;

lib/POE/Component/IRC/Qnet/State.pm

@@ -8,7 +8,7 @@ use POE::Component::IRC::Common qw(:ALL);
 use POE::Component::IRC::Plugin qw(:ALL);
 use base qw(POE::Component::IRC::State POE::Component::IRC::Qnet);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub _create {
     my $self = shift;

lib/POE/Component/IRC/State.pm

@@ -7,7 +7,7 @@ use POE::Component::IRC::Common qw(u_irc parse_mode_line parse_ban_mask);
 use POE::Component::IRC::Plugin qw(PCI_EAT_NONE);
 use base qw(POE::Component::IRC);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 # Event handlers for tracking the STATE. $self->{STATE} is used as our
 # namespace. u_irc() is used to create unique keys.

lib/POE/Filter/IRC.pm

@@ -6,7 +6,7 @@ use POE::Filter::Stackable;
 use POE::Filter::IRCD;
 use POE::Filter::IRC::Compat;
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 sub new {
     my ($package, %opts) = @_;

lib/POE/Filter/IRC/Compat.pm

@@ -7,7 +7,7 @@ use POE::Filter::IRCD;
 use File::Basename qw(fileparse);
 use base qw(POE::Filter);
 
-our $VERSION = '6.11_01';
+our $VERSION = '6.12';
 
 my %irc_cmds = (
     qr/^\d{3}$/ => sub {