module Dodge.Debug.Terminal
    where
import Dodge.Data
import Dodge.Debug.Flag.Data

import Control.Lens

applyTerminalString :: String -> World -> World
applyTerminalString "NOCLIP" w = w & debugFlags . noClip %~ not
applyTerminalString _ w = w