From 35611199093138ab8a35eee89aaf91fa41dbec34 Mon Sep 17 00:00:00 2001
From: Adrian Kummerlaender
Date: Tue, 15 Mar 2016 11:56:17 +0100
Subject: Add update type predicates

---
 example/echo.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'example')

diff --git a/example/echo.scm b/example/echo.scm
index 7afd5ae..2e190a7 100644
--- a/example/echo.scm
+++ b/example/echo.scm
@@ -27,5 +27,6 @@
 
 (telebot:pollUpdates token
                      (lambda (u)
-                       (begin (print-message u)
-                              (echo-message  u))))
+                       (if (telebot:is-message? u)
+                         (begin (print-message u)
+                                (echo-message  u)))))
-- 
cgit v1.2.3