diff --git a/xmonad.hs b/xmonad.hs index 502db510a15a237f86c65a2d22416e22946bdd21..8698e038c6027431d1171c37e36f6d52b7bf16b1 100644 --- a/xmonad.hs +++ b/xmonad.hs @@ -4,6 +4,7 @@ import System.Posix.Env import Data.Map as M import Data.Char +import Data.Maybe import Graphics.X11.ExtraTypes.XF86 @@ -40,7 +41,6 @@ import XMonad.Prompt import XMonad.Prompt.Window import XMonad.Prompt.Layout import XMonad.Prompt.ConfirmPrompt -import XMonad.Prompt.Pass import XMonad.Layout.LayoutModifier import XMonad.Layout.NoBorders @@ -54,6 +54,8 @@ main = do putEnv "GTK_IM_MODULE=ibus" putEnv "XMODIFIERS=@im=ibus" putEnv "QT_IM_MODULES=ibus" + path <- getEnv "PATH" + (\path -> if (isJust path) then setEnv "PATH" ("/home/kubat/.local/bin/:" ++ (fromJust path)) True else print "No path defined") path xmproc <- spawnPipe "/usr/bin/xmobar -x 0 /home/kubat/.xmonad/xmobar.hs" xmonad $ docks $ ewmh $ withUrgencyHook LibNotifyUrgencyHook $ defaultConfig { modMask = mod4Mask