Start to refactor terminals

src/Dodge/DisplayInventory.hs

@@ -5,6 +5,7 @@ module Dodge.DisplayInventory (
     updateCombinePositioning,
 ) where
 
+import Dodge.CharacterEnums
 import Control.Applicative
 import Control.Lens
 import Control.Monad
@@ -52,8 +53,8 @@ updateCombineSections w cfig =
         [(0, sclose), (-1, sfclose)]
   where
     filtcurs = case w ^? hud . hudElement . subInventory . ciSelection . _Just . _1 of
-        Just (-1) -> [toEnum 219] -- filled rect
-        _ -> [toEnum 128] -- wire rect
+        Just (-1) -> [cFilledRect]
+        _ -> [cWireRect]
     (sfclose, sclose) =
         filterSectionsPair
             filtcurs