diff --git a/src/Dodge/Data/Terminal.hs b/src/Dodge/Data/Terminal.hs
index 528401c23..035f9e309 100644
--- a/src/Dodge/Data/Terminal.hs
+++ b/src/Dodge/Data/Terminal.hs
@@ -61,7 +61,6 @@ data TmWdWd
     | TmWdWdDoDeathTriggers
     | TmTmClearDisplayedLines
     | TmTmSetStatus TerminalStatus
---    | TmGetSensor String
 
 makeLenses ''Terminal
 makeLenses ''TerminalLine
diff --git a/src/Dodge/Update.hs b/src/Dodge/Update.hs
index d2b88b417..5e39b7481 100644
--- a/src/Dodge/Update.hs
+++ b/src/Dodge/Update.hs
@@ -425,8 +425,7 @@ advanceScrollAmount =
 
 updatePastWorlds :: World -> World
 updatePastWorlds w =
-    w
-        & pastWorlds %~ (forceFoldable . take 100 . ((w ^. cWorld . lWorld) :))
+    w & pastWorlds %~ (forceFoldable . take 100 . ((w ^. cWorld . lWorld) :))
 
 doWorldEvents :: World -> World
 doWorldEvents w =