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