From 44545263ae29b3ab85aa1d73473cef8839d304fc Mon Sep 17 00:00:00 2001 From: Chris Williams Date: Thu, 10 Sep 2009 09:35:08 +0100 Subject: [PATCH] Prepare for a CPAN Release --- Changes | 53 ++++++-------------- MANIFEST | 4 +- Makefile.PL | 13 +---- lib/POE/Component/IRC.pm | 2 +- lib/POE/Component/IRC/Common.pm | 2 +- lib/POE/Component/IRC/Constants.pm | 2 +- lib/POE/Component/IRC/Plugin.pm | 2 +- lib/POE/Component/IRC/Plugin/AutoJoin.pm | 2 +- lib/POE/Component/IRC/Plugin/BotAddressed.pm | 2 +- lib/POE/Component/IRC/Plugin/BotCommand.pm | 2 +- lib/POE/Component/IRC/Plugin/BotTraffic.pm | 2 +- lib/POE/Component/IRC/Plugin/CTCP.pm | 2 +- lib/POE/Component/IRC/Plugin/Connector.pm | 2 +- lib/POE/Component/IRC/Plugin/Console.pm | 2 +- lib/POE/Component/IRC/Plugin/CycleEmpty.pm | 2 +- lib/POE/Component/IRC/Plugin/DCC.pm | 2 +- lib/POE/Component/IRC/Plugin/FollowTail.pm | 2 +- lib/POE/Component/IRC/Plugin/ISupport.pm | 2 +- lib/POE/Component/IRC/Plugin/Logger.pm | 2 +- lib/POE/Component/IRC/Plugin/NickReclaim.pm | 2 +- lib/POE/Component/IRC/Plugin/NickServID.pm | 2 +- lib/POE/Component/IRC/Plugin/PlugMan.pm | 2 +- lib/POE/Component/IRC/Plugin/Proxy.pm | 2 +- lib/POE/Component/IRC/Plugin/Whois.pm | 2 +- lib/POE/Component/IRC/Qnet.pm | 2 +- lib/POE/Component/IRC/Qnet/State.pm | 2 +- lib/POE/Component/IRC/State.pm | 2 +- lib/POE/Filter/IRC.pm | 2 +- lib/POE/Filter/IRC/Compat.pm | 2 +- 29 files changed, 44 insertions(+), 78 deletions(-) diff --git a/Changes b/Changes index 23de6593..f804bdfd 100644 --- a/Changes +++ b/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) diff --git a/MANIFEST b/MANIFEST index 3aa1cd3b..864a70bc 100644 --- a/MANIFEST +++ b/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 diff --git a/Makefile.PL b/Makefile.PL index 038cb3b7..81f14a07 100644 --- a/Makefile.PL +++ b/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 < 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'; diff --git a/lib/POE/Component/IRC.pm b/lib/POE/Component/IRC.pm index 831e5743..c173392f 100644 --- a/lib/POE/Component/IRC.pm +++ b/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 { diff --git a/lib/POE/Component/IRC/Common.pm b/lib/POE/Component/IRC/Common.pm index 63eef114..0f322b38 100644 --- a/lib/POE/Component/IRC/Common.pm +++ b/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); diff --git a/lib/POE/Component/IRC/Constants.pm b/lib/POE/Component/IRC/Constants.pm index ec49f806..c029c66e 100644 --- a/lib/POE/Component/IRC/Constants.pm +++ b/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); diff --git a/lib/POE/Component/IRC/Plugin.pm b/lib/POE/Component/IRC/Plugin.pm index 4caa8c86..16d2bcd7 100644 --- a/lib/POE/Component/IRC/Plugin.pm +++ b/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); diff --git a/lib/POE/Component/IRC/Plugin/AutoJoin.pm b/lib/POE/Component/IRC/Plugin/AutoJoin.pm index 7a0e672a..2f0d009a 100644 --- a/lib/POE/Component/IRC/Plugin/AutoJoin.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/BotAddressed.pm b/lib/POE/Component/IRC/Plugin/BotAddressed.pm index ef9081db..99aee56f 100644 --- a/lib/POE/Component/IRC/Plugin/BotAddressed.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/BotCommand.pm b/lib/POE/Component/IRC/Plugin/BotCommand.pm index eb195828..8e23ee8c 100644 --- a/lib/POE/Component/IRC/Plugin/BotCommand.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/BotTraffic.pm b/lib/POE/Component/IRC/Plugin/BotTraffic.pm index 49aad889..1b3ed66c 100644 --- a/lib/POE/Component/IRC/Plugin/BotTraffic.pm +++ b/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) = @_; diff --git a/lib/POE/Component/IRC/Plugin/CTCP.pm b/lib/POE/Component/IRC/Plugin/CTCP.pm index 85131ad8..70c0c728 100644 --- a/lib/POE/Component/IRC/Plugin/CTCP.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/Connector.pm b/lib/POE/Component/IRC/Plugin/Connector.pm index dd538e97..307c85fd 100644 --- a/lib/POE/Component/IRC/Plugin/Connector.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/Console.pm b/lib/POE/Component/IRC/Plugin/Console.pm index 1085f819..d13fec5f 100644 --- a/lib/POE/Component/IRC/Plugin/Console.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/CycleEmpty.pm b/lib/POE/Component/IRC/Plugin/CycleEmpty.pm index 355cee54..b6d5268f 100644 --- a/lib/POE/Component/IRC/Plugin/CycleEmpty.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/DCC.pm b/lib/POE/Component/IRC/Plugin/DCC.pm index fe58b9be..57e100da 100644 --- a/lib/POE/Component/IRC/Plugin/DCC.pm +++ b/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 diff --git a/lib/POE/Component/IRC/Plugin/FollowTail.pm b/lib/POE/Component/IRC/Plugin/FollowTail.pm index 7b2d6bcd..42c3f2ef 100644 --- a/lib/POE/Component/IRC/Plugin/FollowTail.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/ISupport.pm b/lib/POE/Component/IRC/Plugin/ISupport.pm index ecf32509..c0894d88 100644 --- a/lib/POE/Component/IRC/Plugin/ISupport.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/Logger.pm b/lib/POE/Component/IRC/Plugin/Logger.pm index 02594245..34c0e83c 100644 --- a/lib/POE/Component/IRC/Plugin/Logger.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/NickReclaim.pm b/lib/POE/Component/IRC/Plugin/NickReclaim.pm index 1f90586d..c1d7b9bf 100644 --- a/lib/POE/Component/IRC/Plugin/NickReclaim.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/NickServID.pm b/lib/POE/Component/IRC/Plugin/NickServID.pm index d7077b0b..742397c6 100644 --- a/lib/POE/Component/IRC/Plugin/NickServID.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/PlugMan.pm b/lib/POE/Component/IRC/Plugin/PlugMan.pm index cacee294..e47ce787 100644 --- a/lib/POE/Component/IRC/Plugin/PlugMan.pm +++ b/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 diff --git a/lib/POE/Component/IRC/Plugin/Proxy.pm b/lib/POE/Component/IRC/Plugin/Proxy.pm index a0aae6bd..595f2472 100644 --- a/lib/POE/Component/IRC/Plugin/Proxy.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Plugin/Whois.pm b/lib/POE/Component/IRC/Plugin/Whois.pm index bed4acab..e6fc2f49 100644 --- a/lib/POE/Component/IRC/Plugin/Whois.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Qnet.pm b/lib/POE/Component/IRC/Qnet.pm index 0b61cfd1..187d83b7 100644 --- a/lib/POE/Component/IRC/Qnet.pm +++ b/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; diff --git a/lib/POE/Component/IRC/Qnet/State.pm b/lib/POE/Component/IRC/Qnet/State.pm index b0694d92..4da9e45f 100644 --- a/lib/POE/Component/IRC/Qnet/State.pm +++ b/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; diff --git a/lib/POE/Component/IRC/State.pm b/lib/POE/Component/IRC/State.pm index 1023eb51..96f747e0 100644 --- a/lib/POE/Component/IRC/State.pm +++ b/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. diff --git a/lib/POE/Filter/IRC.pm b/lib/POE/Filter/IRC.pm index 2e8cd0d1..819b317f 100644 --- a/lib/POE/Filter/IRC.pm +++ b/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) = @_; diff --git a/lib/POE/Filter/IRC/Compat.pm b/lib/POE/Filter/IRC/Compat.pm index 1d657a63..ce9dde05 100644 --- a/lib/POE/Filter/IRC/Compat.pm +++ b/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 {