Commit 9bf668d5 authored by Nicolas Lenz's avatar Nicolas Lenz ❄️
Browse files

Remove help message direct for now

parent 3efc8219

app/Main.hs

+1 −1
Original line number Diff line number Diff line
@@ -79,7 +79,7 @@ handleUpdate _ = parseUpdate $ 
    Reply <$> directMock

    <|> InlineReply <$> replyToInline

    <|> SendHelp <$ command "help"

    <|> SendHelp <$ text

    -- <|> SendHelp <$ text



-- | How to handle 'Action's.

handleAction :: Action -> Model -> Eff Action Model