3 use Irssi 20020121.2020 ();
6 authors => 'Jean-Yves "decadix" Lefort',
7 contact => 'jylefort\@brutele.be, decadix on IRCNet',
9 description => 'Replaces your terminal bell by a command specified via /set; adds a beep_when_not_away setting',
16 # beep_when_not_away opposite of builtin beep_when_away
18 # beep_command if not empty, the specified command will be
19 # executed instead of the normal terminal bell
24 my $server = Irssi::active_server;
25 if ($server && ! $server->{usermode_away}
26 && ! Irssi::settings_get_bool("beep_when_not_away")) {
29 if (my $command = Irssi::settings_get_str("beep_command")) {
36 Irssi::settings_add_bool("lookandfeel", "beep_when_not_away", 0);
37 Irssi::settings_add_str("misc", "beep_command",
38 "esdplay ~/sound/events/beep.wav &");
40 Irssi::signal_add("beep", "beep");