From 92e666057ee84e1b3f306aa6016bfcc64a960552 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Sun, 25 Jan 2009 18:52:10 -0500
Subject: need to catch the proper arguments to be passing back to $self->say
 each time

---
 lib/Bot/Games.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lib/Bot/Games.pm b/lib/Bot/Games.pm
index 22bf855..9d42e1b 100644
--- a/lib/Bot/Games.pm
+++ b/lib/Bot/Games.pm
@@ -29,16 +29,17 @@ has done_init => (
 );
 
 my $say;
+my $say_args;
 
 sub BUILD {
     my $self = shift;
     $say = sub {
         shift;
-        return $self->say(%$args, body => $self->_format(@_)) if @_ == 1;
+        return $self->say(%$say_args, body => $self->_format(@_)) if @_ == 1;
         my %overrides = @_;
         $overrides{body} = $self->_format($overrides{body})
             if exists $overrides{body};
-        return $self->say(%$args, %overrides);
+        return $self->say(%$say_args, %overrides);
     };
     require Bot::Games::Game;
     Bot::Games::Game->meta->add_method(say => $say);
@@ -49,6 +50,7 @@ sub said {
     my $self = shift;
     my ($args) = @_;
     my $prefix = $self->prefix;
+    $say_args = $args;
 
     return if $args->{channel} eq 'msg';
     return unless $args->{body} =~ /^$prefix(\w+)(?:\s+(.*))?/;
-- 
cgit v1.2.3-54-g00ecf