From 700eebdf341cf8d963201d3b9b058b472dabf147 Mon Sep 17 00:00:00 2001
From: Snorky <croizet.pa@sincrone.fr>
Date: Fri, 5 Sep 2025 22:33:02 +0200
Subject: [PATCH] Add shortcut

---
 xmonad.hs | 29 +++++++++++------------------
 1 file changed, 11 insertions(+), 18 deletions(-)

diff --git a/xmonad.hs b/xmonad.hs
index 1925e98..b2b2e26 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -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.Config.Desktop
 import XMonad.Util.Run (safeSpawn)
@@ -54,13 +40,20 @@ main = do
                 } `additionalKeysP` myKeys
 
 
-myKeys = [  (("M4-f"), spawn "brave-bin")
-           ,(("M4-S-q"), io exitSuccess)
-           ,(("M4-q"), spawn "xmonad --recompile; xmonad --restart")
+myKeys = [  -- APP BINDING
+            (("M4-f"), spawn "brave-bin")
+           ,(("M4-s"), spawn "spotify")
            ,(("M4-<Return>"), spawn "mate-terminal")
            ,(("M4-p"), spawn "dmenu_run")
+           
+	   -- KILL APP
            ,(("M4-z"), kill)
-           -- BINDING FOR MOVE WORKSPACE
+           
+	   -- BINDING XMONAD RELOAD
+           ,(("M4-S-q"), io exitSuccess)
+           ,(("M4-q"), spawn "xmonad --recompile; xmonad --restart")
+           
+	   -- BINDING FOR MOVE WORKSPACE
 	   ,(("M4-<F1>"), windows $ W.greedyView "1")
            ,(("M4-<F2>"), windows $ W.greedyView "2")
            ,(("M4-<F3>"), windows $ W.greedyView "3")