diff options
| -rw-r--r-- | src/Rahm/Desktop/XMobarLog/PendingBuffer.hs | 32 |
1 files changed, 20 insertions, 12 deletions
diff --git a/src/Rahm/Desktop/XMobarLog/PendingBuffer.hs b/src/Rahm/Desktop/XMobarLog/PendingBuffer.hs index d49b835..28ba9a8 100644 --- a/src/Rahm/Desktop/XMobarLog/PendingBuffer.hs +++ b/src/Rahm/Desktop/XMobarLog/PendingBuffer.hs @@ -1,18 +1,26 @@ -module Rahm.Desktop.XMobarLog.PendingBuffer where - -import Control.Monad (forM_, join) -import Data.Default -import Data.List (sortOn, (\\)) -import Data.Map (Map) -import qualified Data.Map as Map -import Data.Maybe -import Data.Proxy -import Data.Typeable -import Rahm.Desktop.Logger +module Rahm.Desktop.XMobarLog.PendingBuffer + ( addStringToPendingBuffer, + setPendingBuffer, + clearPendingBuffer, + getPendingBuffer, + pushPendingBuffer, + pushAddPendingBuffer, + ) +where + +import Data.Default (Default (..)) import XMonad (X) import qualified XMonad as X -import qualified XMonad.StackSet as W + ( ExtensionClass (initialValue), + MonadReader (ask), + XConf (config), + XConfig (logHook), + ) import qualified XMonad.Util.ExtensibleState as XS + ( get, + modify, + put, + ) -- The pending buffer keeps track of pending characters. This is useful for when -- inputing Wml language constructs. Helps to keep the user from being too lost |