From b025e00d753fb296843bb2bc5b4dc34072a34e30 Mon Sep 17 00:00:00 2001 From: kiffer <> Date: Sun, 7 Aug 2005 18:03:14 +0000 Subject: korrigierte zeitstrings --- bot.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/bot.pl b/bot.pl index 4720799..2ba3e86 100644 --- a/bot.pl +++ b/bot.pl @@ -7,10 +7,10 @@ use DBI; use POE; use POE::Component::IRC; -#my $current_nick = 'francoise'; -my $current_nick = 'franzi'; -#my $channel = '#kiffer.de'; -my $channel = "#test"; +my $current_nick = 'francoise'; +#my $current_nick = 'franzi'; +my $channel = '#kiffer.de'; +#my $channel = "#test"; POE::Component::IRC->new("francoise"); POE::Session->new ( _start => \&irc_start, @@ -303,7 +303,7 @@ sub francoise_stat { if( $age < 60 ) { $agestring = "$secs Sekunde" . ($secs == 1 ? "" : "n"); } elsif( $age < 3600 ) { - $agestring = "$mins Minute" . ($mins == 1 ? "" : "n") . "$secs Sekunde" + $agestring = "$mins Minute" . ($mins == 1 ? "" : "n") . " $secs Sekunde" . ($secs == 1 ? "" : "n"); } elsif( $age < 86400) { $agestring = "$hours Stunde" . ($hours == 1 ? "" : "n") . " $mins Minute" @@ -400,7 +400,7 @@ sub francoise_count { if ($tmp) { - $kernel->post('francoise', 'privmsg', $channel, "Dazu hab ich $tmp schlaue Sachen zu sagen."); + $kernel->post('francoise', 'privmsg', $channel, "Zu $what hab ich $tmp schlaue Sachen zu sagen."); } else { $kernel->post('francoise', 'privmsg', $channel, "Zu $what weiss ich noch gar nix."); -- cgit v1.2.3