Add shortcut

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,12 +40,19 @@ 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 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")