Cleanup

2022-06-06 16:37:52 +01:00
parent ce323630ee
commit 4e181b8273
8 changed files with 23 additions and 30 deletions
@@ -943,6 +943,7 @@ data TerminalStatus = Connected | Disconnected
 data TerminalInput = TerminalInput
    { _tiText   :: T.Text
    , _tiFocus  :: Bool
+    , _tiSel    :: (Int,Int)
    }
 data Terminal = Terminal
    { _tmID         :: Int 
@@ -954,7 +955,6 @@ data Terminal = Terminal
    , _tmFutureLines    :: [TerminalLine]
    , _tmMaxLines   :: Int
    , _tmTitle  :: String
-    , _tmSel    :: Maybe (Int,Int)
    , _tmInput  :: Maybe TerminalInput
    , _tmScrollCommands :: [TerminalCommand]
    , _tmWriteCommands  :: [TerminalCommand]