* New user flag "+s", to bypass +silent on channels

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@1584 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/files/infobot.help b/files/infobot.help
index 07784b0fe0d3e7e19afe7c8d1564003f81c9e043..5ae4fdfb5a46025bfdbd3e8d1ad9773bd8840eef 100644 (file)
--- a/files/infobot.help
+++ b/files/infobot.help
@@ -482,4 +482,4 @@ flags: D:        - can tell bot to join new channels
 flags: D:        - can [un]lock factoids
 flags: D: "r" - remove factoid.
 flags: D: "t" - teach/add factoid.
-
+flags: D: "s" - Bypass +silent on channels

diff --git a/src/DynaConfig.pl b/src/DynaConfig.pl
index de814b4d2435aa0f83b17ada3148725c201eff42..74e7e4ce934e75c38684bf804d3f43cb47d6b1a1 100644 (file)
--- a/src/DynaConfig.pl
+++ b/src/DynaConfig.pl
@@ -839,6 +839,7 @@ my @regFlagsUser = (
                        # can [un]lock factoids
        'r',    # remove factoid.
        't',    # teach/add factoid.
+       's',    # Bypass +silent on channels
 );
 
 1;

diff --git a/src/IRC/Irc.pl b/src/IRC/Irc.pl
index 70176e84a33fc78ca2747ab14cffc6a4c1573c1f..12aa2038c95a8cd2a86696f2fbccab3116b35be9 100644 (file)
--- a/src/IRC/Irc.pl
+++ b/src/IRC/Irc.pl
@@ -213,7 +213,8 @@ sub say {
        return;
     }
 
-    if (&getChanConf('silent', $talkchannel)) {
+    if (&getChanConf('silent', $talkchannel) and not
+      (&IsFlag("s") and &verifyUser($who,$nuh{lc $who}))) {
        &DEBUG("say: silent in $talkchannel, not saying $msg");
        return;
     }
@@ -272,7 +273,8 @@ sub msg {
     }
 
     # some say() end up here (eg +help)
-    if (&getChanConf('silent', $nick)) {
+    if (&getChanConf('silent', $nick) and not
+       (&IsFlag("s") and &verifyUser($who,$nuh{lc $who}))) {
        &DEBUG("msg: silent in $nick, not saying $msg");
        return;
     }
@@ -313,7 +315,8 @@ sub action {
        return;
     }
 
-    if (&getChanConf('silent', $target)) {
+    if (&getChanConf('silent', $target) and not
+       (&IsFlag("s") and &verifyUser($who,$nuh{lc $who}))) {
        &DEBUG("action: silent in $target, not doing $txt");
        return;
     }