diff --git a/src/Xanthous/Game/Draw.hs b/src/Xanthous/Game/Draw.hs
index a9b55945f..659081e57 100644
--- a/src/Xanthous/Game/Draw.hs
+++ b/src/Xanthous/Game/Draw.hs
@@ -43,7 +43,7 @@ cursorPosition game
   = showCursor Resource.Character (game ^. characterPosition . loc)
 
 drawMessages :: MessageHistory -> Widget Name
-drawMessages = txtWrap . (<> " ") . unwords . oextract
+drawMessages = txtWrap . (<> " ") . unwords . reverse . oextract
 
 drawPromptState :: GamePromptState m -> Widget Name
 drawPromptState NoPrompt = emptyWidget