r30031 - in /trunk/libpoe-component-irc-perl: ./ debian/ lib/POE/Component/ lib/POE/Component/IRC/ lib/POE/Component/IRC/Cookbook/ lib/POE/Component/IRC/Plugin/
ryan52-guest at users.alioth.debian.org
ryan52-guest at users.alioth.debian.org
Sat Jan 24 03:21:35 UTC 2009
Author: ryan52-guest
Date: Sat Jan 24 03:21:32 2009
New Revision: 30031
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=30031
Log:
new upstream version
Added:
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Reload.pod
- copied unchanged from r30027, branches/upstream/libpoe-component-irc-perl/current/lib/POE/Component/IRC/Cookbook/Reload.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Seen.pod
- copied unchanged from r30027, branches/upstream/libpoe-component-irc-perl/current/lib/POE/Component/IRC/Cookbook/Seen.pod
Modified:
trunk/libpoe-component-irc-perl/Changes
trunk/libpoe-component-irc-perl/MANIFEST
trunk/libpoe-component-irc-perl/META.yml
trunk/libpoe-component-irc-perl/Makefile.PL
trunk/libpoe-component-irc-perl/debian/changelog
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC.pm
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/BasicBot.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Disconnecting.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/MegaHAL.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Resolver.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Translator.pod
trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Plugin/Proxy.pm
Modified: trunk/libpoe-component-irc-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/Changes?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/Changes (original)
+++ trunk/libpoe-component-irc-perl/Changes Sat Jan 24 03:21:32 2009
@@ -1,4 +1,10 @@
Revision history for Perl extension POE::Component::IRC.
+
+5.90 Thu Jan 22 10:52:53 GMT 2009
+ - Seen.pod: Recipe for a bot implementing the 'seen' command (Hinrik)
+ - Reload.pod: How to reload your bot with out reconnecting (Hinrik)
+ - Memory leak with stashing $self in $self->{alias}, change to
+ stash a stringified version of $self instead. (bingos)
5.88 Thu Aug 28 15:49:48 BST 2008
- MegaHAL.pod: Bare-bones recipe for a MegaHAL bot (Hinrik)
Modified: trunk/libpoe-component-irc-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/MANIFEST?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/MANIFEST (original)
+++ trunk/libpoe-component-irc-perl/MANIFEST Sat Jan 24 03:21:32 2009
@@ -33,7 +33,9 @@
lib/POE/Component/IRC/Cookbook/BasicBot.pod
lib/POE/Component/IRC/Cookbook/Disconnecting.pod
lib/POE/Component/IRC/Cookbook/MegaHAL.pod
+lib/POE/Component/IRC/Cookbook/Reload.pod
lib/POE/Component/IRC/Cookbook/Resolver.pod
+lib/POE/Component/IRC/Cookbook/Seen.pod
lib/POE/Component/IRC/Cookbook/Translator.pod
lib/POE/Component/IRC/Plugin.pm
lib/POE/Component/IRC/Plugin/AutoJoin.pm
@@ -42,8 +44,8 @@
lib/POE/Component/IRC/Plugin/BotTraffic.pm
lib/POE/Component/IRC/Plugin/Connector.pm
lib/POE/Component/IRC/Plugin/Console.pm
+lib/POE/Component/IRC/Plugin/CTCP.pm
lib/POE/Component/IRC/Plugin/CycleEmpty.pm
-lib/POE/Component/IRC/Plugin/CTCP.pm
lib/POE/Component/IRC/Plugin/DCC.pm
lib/POE/Component/IRC/Plugin/FollowTail.pm
lib/POE/Component/IRC/Plugin/ISupport.pm
Modified: trunk/libpoe-component-irc-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/META.yml?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/META.yml (original)
+++ trunk/libpoe-component-irc-perl/META.yml Sat Jan 24 03:21:32 2009
@@ -20,7 +20,7 @@
Encode: 0
Encode::Guess: 0
POE: 0.3202
- POE::Component::Pluggable: 1.10
+ POE::Component::Pluggable: 1.12
POE::Driver::SysRW: 0
POE::Filter::IRCD: 1.7
POE::Filter::Line: 0
@@ -31,4 +31,4 @@
perl: 5.6.0
resources:
license: http://dev.perl.org/licenses/
-version: 5.88
+version: 5.90
Modified: trunk/libpoe-component-irc-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/Makefile.PL?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/Makefile.PL (original)
+++ trunk/libpoe-component-irc-perl/Makefile.PL Sat Jan 24 03:21:32 2009
@@ -38,7 +38,7 @@
build_requires 'Test::More' => '0.47';
perl_version '5.006';
requires 'POE' => 0.3202;
-requires 'POE::Component::Pluggable' => '1.10';
+requires 'POE::Component::Pluggable' => '1.12';
requires 'POE::Wheel::SocketFactory' => 0;
requires 'POE::Wheel::ReadWrite' => 0;
requires 'POE::Driver::SysRW' => 0;
Modified: trunk/libpoe-component-irc-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/debian/changelog?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/debian/changelog (original)
+++ trunk/libpoe-component-irc-perl/debian/changelog Sat Jan 24 03:21:32 2009
@@ -1,4 +1,4 @@
-libpoe-component-irc-perl (5.88+dfsg-2) UNRELEASED; urgency=low
+libpoe-component-irc-perl (5.90+dfsg-1) UNRELEASED; urgency=low
[ Damyan Ivanov ]
* debian/watch: use dversionmangle instead of uversionmangle. Avoids a (true
@@ -10,7 +10,10 @@
(source stanza).
* debian/control: Added: ${misc:Depends} to Depends: field.
- -- Damyan Ivanov <dmn at debian.org> Tue, 23 Sep 2008 11:18:05 +0300
+ [ Ryan Niebur ]
+ * New upstream release
+
+ -- Ryan Niebur <ryanryan52 at gmail.com> Fri, 23 Jan 2009 19:19:37 -0800
libpoe-component-irc-perl (5.88+dfsg-1) unstable; urgency=low
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC.pm?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC.pm (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC.pm Sat Jan 24 03:21:32 2009
@@ -16,8 +16,8 @@
use Socket;
use base qw(POE::Component::Pluggable);
-our $VERSION = '5.88';
-our $REVISION = do {my at r=(q$Revision: 721 $=~/\d+/g);sprintf"%d"."%04d"x$#r, at r};
+our $VERSION = '5.90';
+our $REVISION = do {my at r=(q$Revision: 731 $=~/\d+/g);sprintf"%d"."%04d"x$#r, at r};
our ($GOT_SSL, $GOT_CLIENT_DNS, $GOT_SOCKET6, $GOT_ZLIB);
BEGIN {
@@ -578,7 +578,7 @@
}
else {
$kernel->alias_set($self);
- $self->{alias} = $self;
+ $self->{alias} = "$self";
}
$self->{ircd_filter} = POE::Filter::IRCD->new(debug => $self->{debug});
@@ -1068,7 +1068,7 @@
$sender_id = $ref->ID();
}
else {
- warn "Can\'t resolve $sender\n";
+ warn "Can't resolve $sender\n";
return;
}
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook.pod?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook.pod (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook.pod Sat Jan 24 03:21:32 2009
@@ -4,86 +4,75 @@
=head1 DESCRIPTION
-B<Note:> This is a work in progress.
-
L<POE::Component::IRC|POE::Component::IRC> is a fully event-driven IRC client
module built around L<POE|POE>. It can be used to write IRC client applications
of any kind. This cookbook features working examples of programs demonstrating
the capabilities of POE::Component::IRC.
+B<Note:> This is a work in progress. The entries without hyperlinks indicate
+unwritten recipes.
+
=head1 RECIPES
-=head2 GENERAL
+=head2 General
-=over
-
-=item L<Disconnecting|POE::Component::IRC::Cookbook::Disconnecting>
+=head3 L<Disconnecting|POE::Component::IRC::Cookbook::Disconnecting>
Shows you how to disconnect gracefully.
-=back
+=head2 Bots
-=head2 BOTS
-
-=over
-
-=item L<A basic bot|POE::Component::IRC::Cookbook::BasicBot>
+=head3 L<A basic bot|POE::Component::IRC::Cookbook::BasicBot>
A basic bot demonstrating the basics of PoCo-IRC.
-=item L<Translator|POE::Component::IRC::Cookbook::Translator>
+=head3 L<Translator|POE::Component::IRC::Cookbook::Translator>
Add translating capabilities to your bot.
-=item L<Resolver|POE::Component::IRC::Cookbook::Resolver>
+=head3 L<Resolver|POE::Component::IRC::Cookbook::Resolver>
Have your bot resolve DNS records for you.
-=item L<MegaHAL|POE::Component::IRC::Cookbook::MegaHAL>
+=head3 L<MegaHAL|POE::Component::IRC::Cookbook::MegaHAL>
Allow your bot to talk, using artificial "intelligence".
-=item Seen
+=head3 L<Seen|POE::Component::IRC::Cookbook::Seen>
Implement the "seen" feature found in many bots, which tells you when your bot
last saw a particular user, and what they were doing/saying.
-=item Feeds
-
-Use your bot as an RSS/Atom feed aggregator.
-
-=item Reminder
-
-Have your bot remind you about something at a later time.
-
-=item Messenger
-
-Have your bot deliver messages to users as soon as they become active.
-
-=item Eval
-
-Have your bot evaluate mathematical expressions and code.
-
-=item Reload
+=head3 L<Reload|POE::Component::IRC::Cookbook::Reload>
Structure your code in such a way that your bot can be reprogrammed at runtime
without reconnecting to the IRC server.
-=back
+=head3 Feeds
-=head2 CLIENTS
+Use your bot as an RSS/Atom feed aggregator.
-=over
+=head3 Reminder
-=item Gtk2
+Have your bot remind you about something at a later time.
+
+=head3 Messenger
+
+Have your bot deliver messages to users as soon as they become active.
+
+=head3 Eval
+
+Have your bot evaluate mathematical expressions and code.
+
+=head2 Clients
+
+=head3 Gtk2
A simple IRC client with a Gtk2 interface.
-=item ReadLine
+=head3 ReadLine
A simple IRC client with a ReadLine interface.
-
-=back
=head1 AUTHOR
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/BasicBot.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/BasicBot.pod?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/BasicBot.pod (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/BasicBot.pod Sat Jan 24 03:21:32 2009
@@ -2,12 +2,12 @@
POE::Component::IRC::Cookbook::BasicBot - A basic IRC bot
-=head1 DESCRIPTION
+=head1 SYNOPSIS
This a very basic bot that connects to IRC, joins a few channels, and announces
its arrival.
-=head1 SYNOPSIS
+=head1 DESCRIPTION
We start off quite simply:
@@ -50,7 +50,7 @@
));
$irc->yield(register => 'join');
- $irc->yield(connect => { });
+ $irc->yield('connect');
}
Now comes our C<irc_join> event handler. We send a message to the channel
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Disconnecting.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Disconnecting.pod?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Disconnecting.pod (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Disconnecting.pod Sat Jan 24 03:21:32 2009
@@ -3,11 +3,11 @@
POE::Component::IRC::Cookbook::Disconnecting - How to disconnect gracefully
with PoCo-IRC
-=head1 DESCRIPTION
+=head1 SYNOPSIS
Shutting down an IRC bot can be quick and messy, or slow and graceful.
-=head1 SYNOPSIS
+=head1 DESCRIPTION
There are two ways you can shut down an IRC bot/client. The quick and dirty way
is rather simple:
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/MegaHAL.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/MegaHAL.pod?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/MegaHAL.pod (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/MegaHAL.pod Sat Jan 24 03:21:32 2009
@@ -2,13 +2,13 @@
POE::Component::IRC::Cookbook::MegaHAL - A blabbering IRC bot
-=head1 DESCRIPTION
+=head1 SYNOPSIS
This bot uses L<POE::Component::IRC::Plugin::MegaHAL|POE::Component::IRC::Plugin::MegaHAL>
for most of its magic. As of yet, this recipe just contains a SYNOPSIS that is
copied from its documentation.
-=head1 SYNOPSIS
+=head1 DESCRIPTION
#!/usr/bin/env perl
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Resolver.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Resolver.pod?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Resolver.pod (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Resolver.pod Sat Jan 24 03:21:32 2009
@@ -2,12 +2,12 @@
POE::Component::IRC::Cookbook::Resolver - A bot that can resolve DNS records
-=head1 DESCRIPTION
+=head1 SYNOPSIS
This bot uses L<POE::Component::Client::DNS|POE::Component::Client::DNS>
to DNS records for channel members.
-=head1 SYNOPSIS
+=head1 DESCRIPTION
#!/usr/bin/env perl
@@ -49,7 +49,7 @@
$heap->{dns} = POE::Component::Client::DNS->spawn();
$irc->yield(register => 'botcmd_resolve');
- $irc->yield(connect => );
+ $irc->yield('connect');
return;
}
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Translator.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Translator.pod?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Translator.pod (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Cookbook/Translator.pod Sat Jan 24 03:21:32 2009
@@ -2,13 +2,13 @@
POE::Component::IRC::Cookbook::Translator - A bot that can translate text
-=head1 DESCRIPTION
+=head1 SYNOPSIS
This bot uses L<POE::Component::Lingua::Translate|POE::Component::Lingua::Translate>
to translate text for channel members. It makes use of the C<BotCommand> plugin
to handle the translate command.
-=head1 SYNOPSIS
+=head1 DESCRIPTION
#!/usr/bin/env perl
@@ -53,7 +53,7 @@
));
$irc->yield(register => 'botcmd_trans');
- $irc->yield(connect => );
+ $irc->yield('connect');
return;
}
Modified: trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Plugin/Proxy.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Plugin/Proxy.pm?rev=30031&op=diff
==============================================================================
--- trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Plugin/Proxy.pm (original)
+++ trunk/libpoe-component-irc-perl/lib/POE/Component/IRC/Plugin/Proxy.pm Sat Jan 24 03:21:32 2009
@@ -251,7 +251,7 @@
sub _client_flush {
my ($kernel, $self, $wheel_id) = @_[KERNEL, OBJECT, ARG0];
- return if !defined ( $self->{wheels}->{ $wheel_id } ) or !$self->{wheels}->{ $wheel_id }->{quiting};
+ return if !defined $self->{wheels}->{ $wheel_id } || !$self->{wheels}->{ $wheel_id }->{quiting};
$self->_close_wheel( $wheel_id );
return;
}
More information about the Pkg-perl-cvs-commits
mailing list