From: bw1 <redacted>
Date: Sun, 23 Dec 2018 21:07:33 +0000 (+0100)
Subject: [beepaway] bug fix
X-Git-Url: http://git.99rst.org/?a=commitdiff_plain;h=9a1c6c8373065652f66d2b6418838ee20a4bf035;p=irssi-scripts.irssi.org.git

[beepaway] bug fix
---

diff --git a/scripts/beepaway.pl b/scripts/beepaway.pl
index e381b93..ade6e7b 100644
--- a/scripts/beepaway.pl
+++ b/scripts/beepaway.pl
@@ -4,7 +4,7 @@
 
 use strict;
 use vars qw($VERSION %IRSSI);
-$VERSION = "2003011501";
+$VERSION = "2018122301";
 %IRSSI = (
     authors     => "Simon 'corecode' Schubert",
     contact     => "corecode\@corecode.ath.cx",
@@ -26,7 +26,11 @@ sub catch_away {
 		$level = Irssi::settings_get_str("beep_back_msg_level")
 	}
 #	Irssi::print "%R>>%n setting levels ``$level''";
-	$server->command("/^set beep_msg_level ".$level);
+	if ($level eq '' || $level =~ m/NONE/) {
+		$server->command("/^set -clear beep_msg_level ");
+	} else {
+		$server->command("/^set beep_msg_level ".$level);
+	}
 }
 
 Irssi::settings_add_str($IRSSI{name}, "beep_away_msg_level", "MSGS NOTICES DCC DCCMSGS HILIGHT");