X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FPOE%2FComponent%2FIRC%2FPlugin%2FLogger%2FIrssi.pm;h=79c96b94caa3ee63aea31d10fca71ac18fe046c0;hb=8d8f2a70e73d27c1bea19ca6a61c5e5ac11b7ecd;hp=462fa159b2eb4adf44d3d296cd67978fb04a90bc;hpb=440c5c517b4502062922b68d671fab8720be75c8;p=poe-component-irc-plugin-logger-irssi.git

diff --git a/lib/POE/Component/IRC/Plugin/Logger/Irssi.pm b/lib/POE/Component/IRC/Plugin/Logger/Irssi.pm
index 462fa15..79c96b9 100644
--- a/lib/POE/Component/IRC/Plugin/Logger/Irssi.pm
+++ b/lib/POE/Component/IRC/Plugin/Logger/Irssi.pm
@@ -13,26 +13,26 @@ our @EXPORT_OK = qw/irssi_format/;
 ##################################################
 
 my %irssi_format = (
-  nick_change => sub { "-!- $_[0] is now known as $_[1]" },
-  topic_is => sub { "-!- Topic for $_[0]: $_[1]"},
-  topic_change => sub {
-	my ($nick, $topic) = @_;
-	return "-!- $nick changed the topic to: $topic" if $topic;
-	return "-!- Topic unset by $nick" unless $topic;
-  },
-  privmsg => sub{ "<$_[0]> $_[1]" },
-  notice => sub { "-$_[0]- $_[1]" },
-  action => sub { "* $_[0] $_[1]" },
-  join => sub { "-!- $_[0] [$_[1]] has joined $_[2]" },
-  part => sub { "-!- $_[0] [$_[1]] has left $_[2] [$_[3]]" },
-  quit => sub { "-!- $_[0] [$_[1]] has quit [$_[2]]"},
-  kick => sub { "-!- $_[1] was kicked from $_[2] by $_[0] [$_[3]]"},
-  topic_set_by => sub { "-!- Topic set by $_[1] [". localtime($_[2]) .']' },
+	nick_change => sub { "-!- $_[0] is now known as $_[1]" },
+	topic_is => sub { "-!- Topic for $_[0]: $_[1]"},
+	topic_change => sub {
+		my ($nick, $topic) = @_;
+		return "-!- $nick changed the topic to: $topic" if $topic;
+		return "-!- Topic unset by $nick" unless $topic;
+	},
+	privmsg => sub{ "<$_[0]> $_[1]" },
+	notice => sub { "-$_[0]- $_[1]" },
+	action => sub { "* $_[0] $_[1]" },
+	join => sub { "-!- $_[0] [$_[1]] has joined $_[2]" },
+	part => sub { "-!- $_[0] [$_[1]] has left $_[2] [$_[3]]" },
+	quit => sub { "-!- $_[0] [$_[1]] has quit [$_[2]]"},
+	kick => sub { "-!- $_[1] was kicked from $_[2] by $_[0] [$_[3]]"},
+	topic_set_by => sub { "-!- Topic set by $_[1] [". localtime($_[2]) .']' },
 );
 
 for my $letter ('a' .. 'z', 'A' .. 'Z') {
-  $irssi_format{"+$letter"} = sub { my $nick = shift; "-!- mode [+$letter @_] by $nick" };
-  $irssi_format{"-$letter"} = sub { my $nick = shift; "-!- mode [-$letter @_] by $nick" }
+	$irssi_format{"+$letter"} = sub { my $nick = shift; "-!- mode [+$letter @_] by $nick" };
+	$irssi_format{"-$letter"} = sub { my $nick = shift; "-!- mode [-$letter @_] by $nick" }
 }
 
 sub irssi_format { \%irssi_format }