diff options
| author | Baitinq <manuelpalenzuelamerino@gmail.com> | 2022-07-06 20:29:37 +0200 |
|---|---|---|
| committer | Baitinq <manuelpalenzuelamerino@gmail.com> | 2022-07-06 20:41:23 +0200 |
| commit | f3f2ee52b223a82adb0befbcc58155b5b80c5e6b (patch) | |
| tree | 363108f3249ccc332f34b534ad1f7d6cbab91756 /dotfiles | |
| parent | fmt (diff) | |
| download | nixos-config-f3f2ee52b223a82adb0befbcc58155b5b80c5e6b.tar.gz nixos-config-f3f2ee52b223a82adb0befbcc58155b5b80c5e6b.tar.bz2 nixos-config-f3f2ee52b223a82adb0befbcc58155b5b80c5e6b.zip | |
XMonad: Remove unnecessary imports
Diffstat (limited to 'dotfiles')
| -rw-r--r-- | dotfiles/xmonad.hs | 43 |
1 files changed, 9 insertions, 34 deletions
diff --git a/dotfiles/xmonad.hs b/dotfiles/xmonad.hs index 3280f51..b61621c 100644 --- a/dotfiles/xmonad.hs +++ b/dotfiles/xmonad.hs @@ -2,50 +2,26 @@ import System.IO import System.Exit import qualified Data.List as L +import qualified Data.Map as M import XMonad -import XMonad.Actions.Navigation2D -import XMonad.Actions.UpdatePointer -import XMonad.Hooks.DynamicLog +import qualified XMonad.StackSet as W + import XMonad.Hooks.ManageDocks -import XMonad.Hooks.ManageHelpers -import XMonad.Hooks.SetWMName +import XMonad.Hooks.ServerMode +import XMonad.Hooks.StatusBar +import XMonad.Hooks.StatusBar.PP +import XMonad.Hooks.EwmhDesktops import XMonad.Layout.Gaps -import XMonad.Layout.Fullscreen -import XMonad.Layout.BinarySpacePartition as BSP import XMonad.Layout.NoBorders -import XMonad.Layout.Tabbed -import XMonad.Layout.ThreeColumns import XMonad.Layout.Spacing import XMonad.Layout.MultiToggle import XMonad.Layout.MultiToggle.Instances -import XMonad.Layout.NoFrillsDecoration -import XMonad.Layout.Renamed -import XMonad.Layout.Simplest -import XMonad.Layout.SubLayouts -import XMonad.Layout.WindowNavigation -import XMonad.Layout.ZoomRow - -import XMonad.Util.Run(spawnPipe) -import XMonad.Util.EZConfig(additionalKeys) -import XMonad.Util.Cursor - -import Graphics.X11.ExtraTypes.XF86 -import qualified XMonad.StackSet as W -import qualified Data.Map as M - -import XMonad.Hooks.ServerMode -import XMonad.Actions.WorkspaceNames - -import XMonad.Hooks.StatusBar -import XMonad.Hooks.StatusBar.PP import XMonad.Actions.CycleWS -import XMonad.Hooks.EwmhDesktops - import XMonad.Util.ClickableWorkspaces ------------------------------------------------------------------------ @@ -72,7 +48,6 @@ myWorkspaces = map show [1..9] -- myManageHook = composeAll [ - isFullscreen --> (doF W.focusDown <+> doFullFloat) ] @@ -90,9 +65,9 @@ myManageHook = composeAll gap = 7 myGaps = gaps [(U, gap), (R, gap), (L, gap), (D, gap)] -addSpace = renamed [CutWordsLeft 2] . spacing gap +addSpace = spacing gap -tiledLayout = renamed [Replace "[]"] $ tiled +tiledLayout = tiled where -- default tiling algorithm partitions the screen into two panes tiled = Tall nmaster delta ratio |