From ac056ba43192bd3c2cbe90d8c8c3d903985a52dd Mon Sep 17 00:00:00 2001 From: Akshay Nair Date: Sun, 22 Dec 2024 12:54:22 +0530 Subject: Updates docs --- src/Chelleport/Context.hs | 5 ++--- src/Chelleport/KeySequence.hs | 2 +- 2 files changed, 3 insertions(+), 4 deletions(-) (limited to 'src/Chelleport') diff --git a/src/Chelleport/Context.hs b/src/Chelleport/Context.hs index 45c90d4..6452e86 100644 --- a/src/Chelleport/Context.hs +++ b/src/Chelleport/Context.hs @@ -1,11 +1,10 @@ module Chelleport.Context (initializeContext) where --- import Data.Time.Clock.System --- import qualified Debug.Trace as Debug - import Chelleport.Config import Chelleport.Types import Data.ByteString (ByteString) +-- import Data.Time.Clock.System +-- import qualified Debug.Trace as Debug import Data.FileEmbed (embedFileRelative) import qualified Graphics.X11 as X11 import SDL (($=)) diff --git a/src/Chelleport/KeySequence.hs b/src/Chelleport/KeySequence.hs index 9f1f26a..fd8eaa7 100644 --- a/src/Chelleport/KeySequence.hs +++ b/src/Chelleport/KeySequence.hs @@ -5,7 +5,7 @@ import Chelleport.Utils (findWithIndex, uniq) import Control.Monad (guard) import Data.List (elemIndex, isPrefixOf) import qualified Data.Map as Map -import Data.Maybe (fromMaybe, isJust) +import Data.Maybe (isJust) import qualified SDL nextChars :: KeySequence -> KeyGrid -> Maybe [Char] -- cgit v1.3.1