Add shortcut

This commit is contained in:
Snorky 2025-09-05 22:33:02 +02:00
parent 9bc6a0ddda
commit 700eebdf34

View File

@ -1,18 +1,4 @@
-- --
-- Configuration file for XMonad + MATE
--
-- Usage:
-- * Copy this file to ~/.xmonad/
-- * Run: $ xmonad --recompile
-- * Launch: $ xmonad --replace
-- [Optional] Create an autostart to command with "xmonad --replace"
--
-- Author: Arturo Fernandez <arturo at bsnux dot com>
-- Inspired by:
-- Spencer Janssen <spencerjanssen@gmail.com>
-- rfc <reuben.fletchercostin@gmail.com>
-- License: BSD
--
import XMonad import XMonad
import XMonad.Config.Desktop import XMonad.Config.Desktop
import XMonad.Util.Run (safeSpawn) import XMonad.Util.Run (safeSpawn)
@ -54,12 +40,19 @@ main = do
} `additionalKeysP` myKeys } `additionalKeysP` myKeys
myKeys = [ (("M4-f"), spawn "brave-bin") myKeys = [ -- APP BINDING
,(("M4-S-q"), io exitSuccess) (("M4-f"), spawn "brave-bin")
,(("M4-q"), spawn "xmonad --recompile; xmonad --restart") ,(("M4-s"), spawn "spotify")
,(("M4-<Return>"), spawn "mate-terminal") ,(("M4-<Return>"), spawn "mate-terminal")
,(("M4-p"), spawn "dmenu_run") ,(("M4-p"), spawn "dmenu_run")
-- KILL APP
,(("M4-z"), kill) ,(("M4-z"), kill)
-- BINDING XMONAD RELOAD
,(("M4-S-q"), io exitSuccess)
,(("M4-q"), spawn "xmonad --recompile; xmonad --restart")
-- BINDING FOR MOVE WORKSPACE -- BINDING FOR MOVE WORKSPACE
,(("M4-<F1>"), windows $ W.greedyView "1") ,(("M4-<F1>"), windows $ W.greedyView "1")
,(("M4-<F2>"), windows $ W.greedyView "2") ,(("M4-<F2>"), windows $ W.greedyView "2")