diff options
Diffstat (limited to 'src/Tomato')
| -rw-r--r-- | src/Tomato/App.hs | 2 | ||||
| -rw-r--r-- | src/Tomato/Validate.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Tomato/App.hs b/src/Tomato/App.hs index 14bf61a..64168a7 100644 --- a/src/Tomato/App.hs +++ b/src/Tomato/App.hs @@ -25,7 +25,7 @@ runApp inner = do let app = App { appLogFunc = logFunc , appToken = "t2YhlxxwZmn2cWfkAomjMc6BgVPMaC5NRkqHzGQl" - , appBotId = "713bcb4a4604006c944804552c" + , appBotId = "073b2ab07990ce95d7442a9d06" , appFile = "tomato.png" , appClientId = "FbzqI-oR7277JwL1ZGsyUw7yG1F5U0U3WhQ3kOW71Do" } diff --git a/src/Tomato/Validate.hs b/src/Tomato/Validate.hs index fe0d82a..f95601d 100644 --- a/src/Tomato/Validate.hs +++ b/src/Tomato/Validate.hs @@ -11,7 +11,7 @@ import Tomato.Data.Message (InMessage (..)) isTomato :: InMessage -> Bool isTomato m = not (hasAttach m) && - groupId m == "87220147" && + groupId m == "61875176" && isUser m && text m == "tomato" |