diff --git a/telegram-bot-simple/src/Telegram/Bot/Simple/UpdateParser.hs b/telegram-bot-simple/src/Telegram/Bot/Simple/UpdateParser.hs
index 55c4278..c6f2390 100644
--- a/telegram-bot-simple/src/Telegram/Bot/Simple/UpdateParser.hs
+++ b/telegram-bot-simple/src/Telegram/Bot/Simple/UpdateParser.hs
@@ -25,6 +25,9 @@ mkParser f = ask >>= lift . f
 parseUpdate :: UpdateParser a -> Update -> Maybe a
 parseUpdate = runReaderT
 
+runUpdateParser :: UpdateParser a -> Update -> Maybe a
+runUpdateParser = runReaderT
+
 text :: UpdateParser Text
 text = mkParser (extractUpdateMessage >=> messageText)