From d4c8bc60abe49b701daf33a080957e014f9cef00 Mon Sep 17 00:00:00 2001
From: "Brian S. Stephan" <bss@emptymatter.org>
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