include errors in the @lines array, make a format for errors
authorBrian S. Stephan <bss@emptymatter.org>
Fri, 23 Jan 2009 01:11:59 +0000 (19:11 -0600)
committerBrian S. Stephan <bss@emptymatter.org>
Fri, 23 Jan 2009 01:11:59 +0000 (19:11 -0600)
twirssi.pl

index edb207e..a1b4bcf 100644 (file)
@@ -745,7 +745,7 @@ sub monitor_child {
             } elsif ( $meta{type} eq 'dm' ) {
                 push @lines, [(MSGLEVEL_MSGS | $hilight), $meta{type}, $account, $meta{nick}, $_];
             } elsif ( $meta{type} eq 'error' ) {
-                $window->print("ERROR: $_", MSGLEVEL_PUBLIC);
+                push @lines, [MSGLEVEL_MSGS, $_];
             } elsif ( $meta{type} eq 'debug' ) {
                 print "$_" if &debug,;
             } else {
@@ -916,6 +916,7 @@ Irssi::theme_register([
     'twirssi_tweet', '[$0%B@$1%n$2] $3',
     'twirssi_reply', '[$0\--> %B@$1%n$2] $3',
     'twirssi_dm',    '[$0%B@$1%n (%WDM%n)] $2',
+    'twirssi_error', 'ERROR: $0',
 ]);
 
 Irssi::settings_add_str( "twirssi", "twitter_window",     "twitter" );