From b08cd71671eea1b4e7d58b32f12943613432d91e Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Fri, 20 Jan 2023 11:21:26 -0500 Subject: some UI tweaks Change-Id: Id7b3099472c6e15154dc75d3614862f02be031d7 --- lib/cfg.def.h | 6 +++--- lib/xmonad.hs | 13 +++++++------ 2 files changed, 10 insertions(+), 9 deletions(-) (limited to 'lib') diff --git a/lib/cfg.def.h b/lib/cfg.def.h index 57709fc..c6b72b5 100644 --- a/lib/cfg.def.h +++ b/lib/cfg.def.h @@ -51,13 +51,12 @@ static struct command mumble[] = { }; static struct command apps[] = { - DEFCMD ("c", "chromium" , "chromium") DEFCMD ("d", "dolphin" , "dolphin") DEFCMD ("f", "firefox" , "firefox") - DEFCMD ("h", "xterm htop" , "xterm htop") + DEFCMD ("h", "htop" , "urxvt htop") // DEFCMD ("k", "keybase" , "keybase-gui") DEFPREFIX ("m", "mumble" , mumble) - DEFCMD ("r", "ranger" , "xterm ranger") + DEFCMD ("r", "ranger" , "urxvt ranger") DEFCMD ("t", "telegram" , "telegram-desktop") DEFCMD ("q", "qutebrowser", "qutebrowser") }; @@ -78,6 +77,7 @@ static struct command system_commands[] = { // DEFPREFIX("c", "copy/sync", sync_commands) DEFCMD("R", "reboot", "reboot") DEFCMD("S", "suspend", "systemctl suspend") + DEFCMD("L", "logout", "/home/ben/bin/logout") DEFCMD("h", "h-m switch", "home-manager switch") DEFCMD("w", "fresh wall", "wal") DEFCMD("x", "restart xbindkeys", "pkill xbindkeys && xbindkeys") diff --git a/lib/xmonad.hs b/lib/xmonad.hs index 75dd652..047dd83 100644 --- a/lib/xmonad.hs +++ b/lib/xmonad.hs @@ -23,6 +23,7 @@ import Graphics.X11.ExtraTypes.XF86 import XMonad import XMonad.Actions.CopyWindow import XMonad.Config +import XMonad.Config.Desktop import XMonad.Hooks.EwmhDesktops (ewmh) import XMonad.Hooks.ManageDocks import XMonad.Hooks.ManageHelpers (doFullFloat, isFullscreen) @@ -109,7 +110,7 @@ insKeys conf@(XConfig {modMask = modMask}) = ((modMask, xK_o), spawn "rofi -sidebar-mode -show run"), ((modMask, xK_n), spawn "rofi -sidebar-mode -show window"), ((modMask, xK_u), spawn "rofi -show calc -modi calc -no-show-match -no-sort"), - ((modMask, xK_h), scratchpadSpawnActionTerminal transparentTerm), + ((modMask, xK_s), scratchpadSpawnActionTerminal transparentTerm), ((modMask .|. shiftMask, xK_p), namedScratchpadAction scratchpads "pavucontrol"), -- ((modMask, xK_h), spawn transparentTerm), -- refresh display via autorandr @@ -146,9 +147,9 @@ addSpace :: l a -> ModifiedLayout Spacing l a addSpace = spacingRaw False - (Border 15 15 15 15) + (Border 5 5 5 5) True - (Border 15 15 15 15) + (Border 5 5 5 5) True myTabCfg theme = @@ -166,8 +167,8 @@ myLayout theme = ||| (addSpace $ noBorders Full) ||| twopane ||| Mirror twopane - -- ||| ThreeCol 1 (3 / 100) (1 / 2) - -- ||| ThreeColMid 1 (3 / 100) (1 / 2) + ||| ThreeCol 1 (3 / 100) (1 / 2) + ||| ThreeColMid 1 (3 / 100) (1 / 2) ||| tiled ||| Mirror tiled ||| emptyBSP @@ -191,7 +192,7 @@ myLayout theme = myConf theme = additionalKeys cfg (insKeys cfg) where cfg = - def + desktopConfig { modMask = mod4Mask, -- super instead of alt normalBorderColor = background theme, focusedBorderColor = highlight theme, -- cgit v1.2.3