diff --git a/src/Dodge/Data.hs b/src/Dodge/Data.hs
index aabb38bf5..ee0f32423 100644
--- a/src/Dodge/Data.hs
+++ b/src/Dodge/Data.hs
@@ -955,13 +955,14 @@ data Terminal = Terminal
     , _tmMachineID  :: Int
     , _tmName       :: String
     , _tmDisplayedLines :: [(String,Color)]
-    , _tmFutureLines :: [TerminalLine]
+    , _tmFutureLines    :: [TerminalLine]
+    , _tmMaxLines   :: Int
     , _tmTitle  :: String
-    , _tmSel :: Maybe (Int,Int)
-    , _tmInput   :: Maybe T.Text
+    , _tmSel    :: Maybe (Int,Int)
+    , _tmInput  :: Maybe T.Text
     , _tmScrollCommands :: [TerminalCommand]
-    , _tmWriteCommands :: [TerminalCommand]
-    , _tmDeathEffect  :: Terminal -> World -> World
+    , _tmWriteCommands  :: [TerminalCommand]
+    , _tmDeathEffect    :: Terminal -> World -> World
     }
 data Machine = Machine
     { _mcID     :: Int
diff --git a/src/Dodge/Default.hs b/src/Dodge/Default.hs
index 06d3f8770..7f9a3d775 100644
--- a/src/Dodge/Default.hs
+++ b/src/Dodge/Default.hs
@@ -250,6 +250,7 @@ defaultTerminal = Terminal
     , _tmName = "TESTTERMINAL"
     , _tmDisplayedLines = []
     , _tmFutureLines = []
+    , _tmMaxLines = 14
     , _tmTitle = "TERMINAL IN LOCATION"
     , _tmSel   = Nothing
     , _tmInput = Nothing