primrose/.files
1
0
Fork 0
mirror of https://codeberg.org/leana8959/.files.git synced 2025-12-06 06:39:14 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

xmonad: refactored imports

Browse source
This commit is contained in:
Primrose 2024-11-09 14:01:14 +01:00
parent 77b555c13c
commit b61c68a0b6
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA
1 changed files with 26 additions and 48 deletions
Download patch file Download diff file Expand all files Collapse all files

34
.config/xmonad/xmonad.hs
View file

@ -2,14 +2,8 @@
{-# LANGUAGE OverloadedStrings #-}
import XMonad
import XMonad.Core (SomeMessage)
import XMonad.Layout.LayoutModifier (LayoutModifier (handleMessOrMaybeModifyIt, handleMess),
ModifiedLayout (ModifiedLayout))
import XMonad.Actions.PerWindowKeys (bindFirst)
import XMonad.Actions.SpawnOn (spawnOn)
import XMonad.Actions.SwapWorkspaces(swapWithCurrent)
import XMonad.Actions.WorkspaceNames(getCurrentWorkspaceName)
import XMonad.Util.EZConfig (additionalKeys, removeKeys)
import XMonad.Util.NamedScratchpad (NamedScratchpad (NS),
@ -20,41 +14,25 @@ import XMonad.Util.NamedScratchpad (NamedScratchpad (NS),
import XMonad.Util.Paste (sendKey)
import XMonad.Util.SpawnOnce (spawnOnce)
import XMonad.Layout.LayoutModifier (LayoutModifier (handleMessOrMaybeModifyIt, handleMess),
ModifiedLayout (ModifiedLayout))
import XMonad.Layout.NoBorders (Ambiguity (OnlyScreenFloat),
lessBorders)
import XMonad.Layout.Reflect (reflectHoriz, reflectVert, Reflect)
import XMonad.Layout.Renamed (Rename (Replace), renamed)
import XMonad.Layout.Reflect (reflectHoriz)
import XMonad.Layout.Spacing (spacingWithEdge)
import XMonad.Layout.Magnifier (magnifierOff, MagnifyMsg (Toggle, MagnifyMore, MagnifyLess))
import XMonad.Hooks.DynamicLog (PP (ppCurrent, ppHiddenNoWindows, ppSep),
filterOutWsPP, wrap, xmobarColor)
import XMonad.Hooks.EwmhDesktops (ewmh, ewmhFullscreen)
import XMonad.Hooks.StatusBar (defToggleStrutsKey,
statusBarProp, withEasySB, dynamicSBs,
StatusBarConfig, statusBarPropTo,
dynamicEasySBs)
import XMonad.Hooks.StatusBar (statusBarProp, StatusBarConfig, dynamicEasySBs)
import XMonad.Hooks.StatusBar.PP (PP (ppCurrent, ppHiddenNoWindows, ppSep),
filterOutWsPP, wrap, xmobarColor)
import XMonad.Hooks.InsertPosition (insertPosition, Focus(Newer), Position(Below))
import XMonad.Hooks.Focus (Focus(currentWorkspace, focusedWindow))
import Graphics.X11.ExtraTypes.XF86 (xF86XK_AudioLowerVolume,
xF86XK_AudioMute,
xF86XK_AudioNext,
xF86XK_AudioPlay,
xF86XK_AudioPrev,
xF86XK_AudioRaiseVolume,
xF86XK_Display,
xF86XK_MonBrightnessDown,
xF86XK_MonBrightnessUp)
import Graphics.X11.ExtraTypes.XF86
import qualified XMonad.StackSet as W
import Control.Monad (msum)
import Data.Ratio (Ratio, (%))
import qualified Data.Text as T
import XMonad.StackSet qualified as W
xmonadConfig =
def