diff options
| author | Charles Cabergs <me@cacharle.xyz> | 2024-10-18 13:15:13 +0200 |
|---|---|---|
| committer | Charles Cabergs <me@cacharle.xyz> | 2024-10-18 13:15:13 +0200 |
| commit | 6b4c64b1f78e7133181d1a9b4bff25737e79f97e (patch) | |
| tree | 32795ab6e1bc49b3ad90c58396e2234b92576167 /config | |
| parent | 3e9162e4a7852c60f2d60287ec34018ddb8ae1bd (diff) | |
| download | dotfiles-6b4c64b1f78e7133181d1a9b4bff25737e79f97e.tar.gz dotfiles-6b4c64b1f78e7133181d1a9b4bff25737e79f97e.tar.bz2 dotfiles-6b4c64b1f78e7133181d1a9b4bff25737e79f97e.zip | |
Add portable battery scripts
Diffstat (limited to 'config')
| -rw-r--r-- | config/xmonad/xmonad.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/config/xmonad/xmonad.hs b/config/xmonad/xmonad.hs index d62e2c6..e405c28 100644 --- a/config/xmonad/xmonad.hs +++ b/config/xmonad/xmonad.hs @@ -5,7 +5,7 @@ import System.Exit import XMonad import XMonad.Config.Desktop (desktopConfig) -import XMonad.ManageHook (composeAll, willFloat, doFloat, doF, className, (-->), (=?), (<+>)) +import XMonad.ManageHook (composeAll, willFloat, doFloat, doF, className, stringProperty, (-->), (=?), (<+>)) -- Utilities import XMonad.Util.Dmenu (menuArgs) @@ -73,6 +73,7 @@ manageHook' = composeAll , className =? "Anki" --> doFloat , className =? "Steam" --> doFloat , className =? "CustomFloating" --> doFloat + , stringProperty "WM_NAME(UTF8_STRING)" =? "Bitwarden" --> doFloat -- , className =? "Gimp" --> doFloat -- , className =? "OBS" --> doFloat , isDialog --> doF swapUp @@ -103,9 +104,7 @@ keys' = [ ("<XF86AudioLowerVolume>", spawn "pulseaudio-ctl down") , ("M-S-t", spawn "translate-prompt") , ("M-a", spawn "screenshot-prompt") , ("M-S-d", spawn "notify-send -i x-office-calendar \"$(date +\"%H:%M %A %d/%m/%Y %B\")\"") - , ("M-S-b", spawn $ "notify-send --hint=int:transient:1 " ++ - "--hint=int:value:\"$(cat /sys/class/power_supply/BAT0/capacity)\" " ++ - "\"Battery: $(cat /sys/class/power_supply/BAT0/status)\"") + , ("M-S-b", spawn "battery-notify") , ("M-q", spawn "notify-send 'Restarting xmonad'" >> spawn restartCmd) , ("M-S-q", confirm "Are you sure you want to shutdown?" $ io exitSuccess) ] |