From 38c7516da85e93726976224b6dca8f84c5c1eabd Mon Sep 17 00:00:00 2001
From: EuAndreh <eu@euandre.org>
Date: Mon, 27 Feb 2023 17:25:19 -0300
Subject: etc/xmonad/xmonad.hs: Inline definitions of "myTerminal" and "dbg"

---
 etc/xmonad/xmonad.hs | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

(limited to 'etc/xmonad/xmonad.hs')

diff --git a/etc/xmonad/xmonad.hs b/etc/xmonad/xmonad.hs
index 4f14952..0a061b2 100644
--- a/etc/xmonad/xmonad.hs
+++ b/etc/xmonad/xmonad.hs
@@ -21,16 +21,10 @@ main = do
         -- , handleEventHook = handleEventHook def <+> docksEventHook
         , layoutHook = myLayoutHook
         , modMask = mod4Mask -- User Super instead of Alt
-        , terminal = myTerminal
+        , terminal = "st"
         , startupHook = myStartup
         } `additionalKeysP` myKeyPBindings
 
-myTerminal :: String
-myTerminal = "st"
-
-dbg :: String
-dbg = "xmessage 'xmonad EuAndreh debug'"
-
 myKeyPBindings :: [(String, X ())]
 myKeyPBindings =
     [
@@ -72,7 +66,7 @@ myKeyPBindings =
       -- Toggle appearence of xmobar
       -- https://stackoverflow.com/a/27646652
     , ("M-f", sendMessage ToggleStruts)
-    , ("M-ç", spawn dbg)
+    , ("M-ç", spawn "xmessage 'xmonad EuAndreh debug'")
 
       -- Vertically resize, taken from:
       -- https://stackoverflow.com/questions/25857674/xmonad-vertical-resize-tile-window
-- 
cgit v1.2.3