#!/usr/bin/perl

# idea by syngin.
# implemented by Alberto Simões (albie@alfarrabio.di.uminho.pt)

package Fu;
use cybot;


register_command("fu",
		 sub {
		   my ($bot,$chan,$nick,$mask, @commands) = @_;

		   $bot->message ($chan, join(" ",map { "$_-fu" } @commands));

		 },
		 "Turns-fu a-fu sentence-fu fu-fu!");

1;