From d4c8bc60abe49b701daf33a080957e014f9cef00 Mon Sep 17 00:00:00 2001 From: "Brian S. Stephan" Date: Thu, 22 Jan 2009 08:07:11 -0600 Subject: [PATCH] print lines at levels appropriate to the tweet. notably, this logs DMs at MSGLEVEL_MSGS, which results in a highlight in the activity bar for most irssi configurations --- twirssi.pl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/twirssi.pl b/twirssi.pl index acb469c..e575b07 100644 --- a/twirssi.pl +++ b/twirssi.pl @@ -734,11 +734,11 @@ sub monitor_child { } if ( $meta{type} eq 'tweet' ) { - push @lines, [$meta{type}, $account, $meta{nick}, $marker, $_]; + push @lines, [MSGLEVEL_PUBLIC, $meta{type}, $account, $meta{nick}, $marker, $_]; } elsif ( $meta{type} eq 'reply' ) { - push @lines, [$meta{type}, $account, $meta{nick}, $marker, $_]; + push @lines, [MSGLEVEL_PUBLIC, $meta{type}, $account, $meta{nick}, $marker, $_]; } elsif ( $meta{type} eq 'dm' ) { - push @lines, [$meta{type}, $account, $meta{nick}, $_]; + push @lines, [MSGLEVEL_MSGS, $meta{type}, $account, $meta{nick}, $_]; } elsif ( $meta{type} eq 'error' ) { $window->print("ERROR: $_", MSGLEVEL_PUBLIC); } elsif ( $meta{type} eq 'debug' ) { @@ -761,8 +761,8 @@ sub monitor_child { if ($new_last_poll) { print "new last_poll = $new_last_poll" if &debug; for my $line ( @lines ) { - $window->printformat(MSGLEVEL_PUBLIC, "twirssi_".@$line[0], - @$line[1,2,3,4]); + $window->printformat(@$line[0], "twirssi_".@$line[1], + @$line[2,3,4,5]); } close FILE; -- 2.39.5