Requires libnotify, have fun!
use strict;
use vars qw($VERSION %IRSSI);
use Irssi;
$VERSION = '0.0.3';
%IRSSI = (
authors => 'Chrelad',
contact => '[email protected]',
name => 'notify',
description => 'Display a pop-up alert for different events.',
url => 'http://google.com',
license => 'GNU General Public License',
changed => '$Date: 2007-02-07 12:00:00 +0100 (Thu, 7 Feb 2008) $'
);
sub pub_msg {
my ($server,$msg,$nick,$address,$target) = @_;
`notify-send -t 8000 "${target} : ${nick}" "${msg}"`;
}
Irssi::signal_add_last("message public", "pub_msg");