diff --git a/src/Xanthous/App.hs b/src/Xanthous/App.hs index 9d606bbef..f663186a3 100644 --- a/src/Xanthous/App.hs +++ b/src/Xanthous/App.hs @@ -205,7 +205,7 @@ handleCommand Eat = do character . characterHitpoints' += edibleItem ^. hitpointsHealed . to fromIntegral message msg $ object ["item" A..= item] - stepGame -- TODO + stepGame -- TODO continue handleCommand Read = do