Updated modal keybindings

1 files changed, 42 insertions, 0 deletions

diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs
index 8d12f3c..34806e8 100644
--- a/.config/XMonad/lib/Defaults.hs
+++ b/.config/XMonad/lib/Defaults.hs
@@ -3,6 +3,7 @@ module Defaults where
 import XMonad
 import XMonad.Layout.Spacing
 import XMonad.Layout.Tabbed
+import XMonad.Actions.GridSelect
 
 myBorder          = "#120F23"
 myBorder'         = "#C44CF2"
@@ -14,12 +15,15 @@ myFont            = "xft:Sauce Code Pro:style=Regular:size=14"
 
 myModMask         = mod4Mask
 myModMask'        = mod1Mask
+myModShiftMask    = myModMask  .|. shiftMask
+myModShiftMask'   = myModMask' .|. shiftMask
 
 myLockscreen      = "notify-send 'to be set up!' 'to be set up!'"
 myColorPicker     = "colorpicker --short --one-shot --preview | xsel -b"
 
 myTerminal        = "open_terminal"
 myTerminal'       = "alacritty"
+myLauncher        = "dmenu_run"
 
 volUp             = "pamixer -i 5"
 volDown           = "pamixer -d 5"
@@ -28,10 +32,25 @@ volMute           = "pamixer -t"
 backlightUp       = "brightnessctl s +5"
 backlightDown     = "brightnessctl s 5-"
 
+wifiOn            = "nmcli radio wifi on"
+wifiOff :: String
+wifiOff           = "nmcli radio wifi off"
+
 screenshot        = "flameshot screen"
 fullScreenshot    = "flameshot full"
 customScreenshot  = "flameshot gui"
 
+myBrowser         = "librewolf"
+myBrowser'        = "brave"
+
+myTorrentClient   = "qbittorrent"
+
+myFileManager     = "pcmanfm"
+myFileManager'    = "lf"
+
+myTextEditor      = "emacs"
+myTextEditor'     = "nvim"
+
 -- workspaces
 myExtraWorkspaces = [(xK_0, "十")] -- , (xK_comma, "  十一  "), (xK_period, "  十二  "), (xK_slash, "  十三  ")]
 myWorkspaces      = ["一", "二", "三", "四", "五", "六", "七", "八", "九"] ++ map snd myExtraWorkspaces
@@ -53,3 +72,26 @@ myTabTheme = def {
     , inactiveTextColor   = "#d0d0d0"
     , decoHeight          = 20
   }
+myGSColorizer :: Window -> Bool -> X (String, String)
+myGSColorizer = colorRangeFromClassName
+  (0x28,0x2c,0x34) -- lowest inactive bg
+  (0x28,0x2c,0x34) -- highest inactive bg
+  -- (0xff,0xff,0xff) -- lowest inactive bg
+  -- (0xff,0xff,0xff) -- highest inactive bg
+  (0xc4,0x4c,0xf2) -- active bg
+  (0xff,0xff,0xff) -- inactive fg
+  (0xff,0xff,0xff) -- active fg
+
+myGSConfig colorizer = (buildDefaultGSConfig myGSColorizer)
+    { gs_cellheight   = 36
+    , gs_cellwidth    = 180
+    , gs_cellpadding  = 6
+    , gs_originFractX = 0.5
+    , gs_originFractY = 0.5
+    , gs_font         = myFont
+    }
+
+myGridSelect = myGSConfig myGSColorizer
+
+-- myBorder          = "#120F23"
+-- myBorder'         = "#C44CF2"