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/Layout/List.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/Layout/List.hs')
| -rw-r--r-- | src/Rahm/Desktop/Layout/List.hs | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/src/Rahm/Desktop/Layout/List.hs b/src/Rahm/Desktop/Layout/List.hs index 787697e..48c2ab5 100644 --- a/src/Rahm/Desktop/Layout/List.hs +++ b/src/Rahm/Desktop/Layout/List.hs @@ -28,11 +28,18 @@ import Control.Applicative ((<|>)) import Control.Arrow (second, (>>>)) import Control.Monad.Identity (runIdentity) import Data.Maybe (fromJust, fromMaybe) -import Data.Proxy -import Data.Void -import GHC.TypeLits +import Data.Proxy (Proxy (..)) +import Data.Void () +import GHC.TypeLits (KnownNat, Nat, natVal, type (+)) import qualified Rahm.Desktop.StackSet as W + ( Workspace (Workspace), + ) import XMonad + ( LayoutClass (description, handleMessage, runLayout), + Message, + Typeable, + fromMessage, + ) -- Type-level lists. LNil is the final of the list. LCons contains a layout and a -- tail. |