From 7041a9939e8b015d372f3bfd1b3503860fde6c06 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 26 Nov 2015 06:58:59 +0000 Subject: support for java awt in xmonad --- .xmonad/xmonad.hs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs index c5ef0cc..7594cd0 100644 --- a/.xmonad/xmonad.hs +++ b/.xmonad/xmonad.hs @@ -183,15 +183,16 @@ main = do } xmonad $ myConfig -autostart = [ spawnKeychain - , spawnOnce "urxvtd -o" +autostart = [ spawnOnce "urxvtd -o" + , spawnKeychain + , liftIO $ setEnv "_JAVA_AWT_WM_NONREPARENTING" "1" ] spawnKeychain = do home <- liftIO getHomeDirectory let keys = map ((home ) . ("/.ssh/id_" ++)) ["ed25519", "ecdsa", "rsa"] keys' <- filterM (liftIO . doesFileExist) keys - safeSpawn "urxvt" $ ["-title", "keysetup", "-e", "keychain"] ++ keys' + safeSpawn "urxvtc" $ ["-title", "keysetup", "-e", "keychain"] ++ keys' assimilateKeychain :: X () assimilateKeychain = liftIO $ assimilateKeychain' >> return () -- cgit v1.2.3