aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--telebot.scm2
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))