diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2022-11-23 00:26:58 -0700 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-11-23 00:26:58 -0700 |
| commit | 1f25484605881af1a8e1475565d2ceb20b88ea85 (patch) | |
| tree | 0dcdb9a3814d51779f7b9aedd39ae516b540f54b /src/Rahm/Desktop/StackSet.hs | |
| parent | 80021afcb29332cfddbd8f7d24a107298064383c (diff) | |
| download | rde-1f25484605881af1a8e1475565d2ceb20b88ea85.tar.gz rde-1f25484605881af1a8e1475565d2ceb20b88ea85.tar.bz2 rde-1f25484605881af1a8e1475565d2ceb20b88ea85.zip | |
Change to use minimal imports.
This is achieved by using `stack build --ghc-options=-ddump-minimal-imports`
and looking for the *.imports files.
Diffstat (limited to 'src/Rahm/Desktop/StackSet.hs')
| -rw-r--r-- | src/Rahm/Desktop/StackSet.hs | 56 |
1 files changed, 53 insertions, 3 deletions
diff --git a/src/Rahm/Desktop/StackSet.hs b/src/Rahm/Desktop/StackSet.hs index 6c425aa..86b8a33 100644 --- a/src/Rahm/Desktop/StackSet.hs +++ b/src/Rahm/Desktop/StackSet.hs @@ -17,13 +17,63 @@ module Rahm.Desktop.StackSet ) where -import Data.Default +import Data.Default () import Data.List (find) import Data.List.Safe (head) import qualified Data.Map as Map + ( fromList, + keys, + lookup, + mapKeys, + ) import Data.Maybe (catMaybes, fromMaybe, listToMaybe) -import XMonad.StackSet as W hiding (greedyView, shiftWin) -import qualified XMonad.StackSet +import XMonad.StackSet as W + ( RationalRect (..), + Screen (..), + Stack (..), + StackSet (..), + Workspace (..), + abort, + allWindows, + currentTag, + delete, + delete', + differentiate, + ensureTags, + filter, + findTag, + float, + focusDown, + focusDown', + focusMaster, + focusUp, + focusUp', + focusWindow, + index, + insertUp, + integrate, + integrate', + lookupWorkspace, + mapLayout, + mapWorkspace, + member, + modify, + modify', + new, + peek, + renameTag, + screens, + shift, + shiftMaster, + sink, + swapDown, + swapMaster, + swapUp, + tagMember, + view, + workspaces, + ) +import qualified XMonad.StackSet (shiftWin) import Prelude hiding (head) data WindowLocation i l a s sd |