diff options
| author | Christoph Lange | 2018-04-19 16:12:02 +0200 |
|---|---|---|
| committer | Christoph Lange | 2018-04-19 16:12:02 +0200 |
| commit | a2b7e8ce331a05d099f05c261ec36dc235caa222 (patch) | |
| tree | 21fb662f24ca73f132fe518d5dcba7d68234d220 | |
| parent | 675add4136bb4ac7eed0ec347373a41f14f5e567 (diff) | |
| download | Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.tar Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.tar.gz Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.tar.bz2 Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.tar.lz Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.tar.xz Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.tar.zst Telebot-a2b7e8ce331a05d099f05c261ec36dc235caa222.zip | |
is-edited_message? -- check if message is edited
| -rw-r--r-- | telebot.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/telebot.scm b/telebot.scm index 34fc466..292151c 100644 --- a/telebot.scm +++ b/telebot.scm @@ -24,6 +24,7 @@ answerInlineQuery ;;; framework is-message? + is-edited_message? is-inline_query? is-chosen_inline_result? poll-updates @@ -248,6 +249,7 @@ (not (equal? #f (alist-ref type update))))) (define is-message? (update-predicate 'message)) + (define is-edited_message? (update-predicate 'edited_message)) (define is-inline_query? (update-predicate 'inline_query)) (define is-chosen_inline_result? (update-predicate 'chosen_inline_result)) |