Merge branch 'master' of theo/bot-irc into master

unefede.pl

@@ -283,22 +283,14 @@ sub said {
     }
     # easter egg
     elsif ($message->{body} =~ /datafoin/) {
-	my $de = int rand(5);
-	if ($de==1) {
-	    return "il ne faut pas me donner à manger après minuit /o\\";
-	}
-	elsif($de==2){
-	    return "omnomnom";
-	}
-	elsif($de==3){
-	    return "mais je vais grossir /o\\";
-	}
-	elsif($de==4){
-	    return "vouiii";
-	}
-	elsif($de==5){
-	    return "datafoin <3";
-	}
+	my @datafoin = (
+	    'il ne faut pas me donner à manger après minuit /o\\',
+	    'omnomnom',
+	    'mais je vais grossir /o\\',
+	    'vouiii',
+	    'datafoin <3',
+	);
+        return $datafoin[int rand($#datafoin+1)];
     }
     elsif ($message->{body} =~ /^\Q$symbol\Erp/) {
         my $url = $message->{body};
@@ -325,5 +317,5 @@ MyBot->new(
     channels => [ '#fdn', '#ffdn', '#franciliens.net', '#faimaison', '#illyse'],
     nick => 'UneFede',
     username => 'bot',
-    name => 'Droide de la Federation FDN, run by Vigdis'
+    name => 'Droide de la Federation FDN, run by fédé'
     )->run();