From 0e17b4bc3a35dde33afba383f24214f5473ed7a2 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Mon, 26 Jan 2009 00:33:03 -0500
Subject: game_list should just return the array, let said() do the formatting

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

(limited to 'lib/Bot/Games.pm')

diff --git a/lib/Bot/Games.pm b/lib/Bot/Games.pm
index 44989c5..dcc4671 100644
--- a/lib/Bot/Games.pm
+++ b/lib/Bot/Games.pm
@@ -71,7 +71,8 @@ sub said {
     return if $args->{channel} eq 'msg';
     return unless $args->{body} =~ /^$prefix(\w+)(?:\s+(.*))?/;
     my ($game_name, $action) = (lc($1), $2);
-    return $self->game_list if $game_name eq 'games';
+    return join ' ', map { $self->prefix . $_} $self->game_list
+        if $game_name eq 'games';
     if ($game_name eq 'help') {
         $game_name = $action;
         $game_name =~ s/^-//;
@@ -144,8 +145,7 @@ sub game_package {
 
 sub game_list {
     my $self = shift;
-    return join ' ', sort map { s/Bot::Games::Game:://; $self->prefix . lc }
-                              $self->games;
+    return sort map { s/Bot::Games::Game:://; lc } $self->games;
 }
 
 sub find_game {
-- 
cgit v1.2.3-54-g00ecf