summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2015-07-16 19:29:03 +0200
committerGregor Kleen <gkleen@yggdrasil.li>2015-07-16 19:29:03 +0200
commit8f0c21a828f9f2b854f5850b454a3b0b76476493 (patch)
tree5349b3605ee0290702038c7c5db386e3f6c32bbe
parent7e14dc64630e39adf884f229a57b5431fec434a5 (diff)
downloaddotfiles-8f0c21a828f9f2b854f5850b454a3b0b76476493.tar
dotfiles-8f0c21a828f9f2b854f5850b454a3b0b76476493.tar.gz
dotfiles-8f0c21a828f9f2b854f5850b454a3b0b76476493.tar.bz2
dotfiles-8f0c21a828f9f2b854f5850b454a3b0b76476493.tar.xz
dotfiles-8f0c21a828f9f2b854f5850b454a3b0b76476493.zip
Moved urxvtd back into xmonad; Fixed spawnKeychain in xmonad
-rw-r--r--.config/systemd/user/urxvtd.service10
-rw-r--r--.xmonad/xmonad.hs11
2 files changed, 8 insertions, 13 deletions
diff --git a/.config/systemd/user/urxvtd.service b/.config/systemd/user/urxvtd.service
deleted file mode 100644
index c5ff9b9..0000000
--- a/.config/systemd/user/urxvtd.service
+++ /dev/null
@@ -1,10 +0,0 @@
1[Unit]
2Description=urxvtd - urxvt terminal daemon
3
4[Service]
5Type=simple
6ExecStart=/bin/sh -c urxvtd
7Restart=always
8
9[Install]
10WantedBy=default.target
diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index 35112a5..621d1e1 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -40,6 +40,9 @@ import Control.Monad (when)
40import Graphics.X11.ExtraTypes.XF86 40import Graphics.X11.ExtraTypes.XF86
41import XMonad.Util.Cursor 41import XMonad.Util.Cursor
42import XMonad.Actions.Warp 42import XMonad.Actions.Warp
43import XMonad.Util.SpawnOnce
44import System.Directory
45import System.FilePath
43 46
44import XMonad.Layout.IM 47import XMonad.Layout.IM
45 48
@@ -164,11 +167,13 @@ main = do
164 xmonad $ myConfig 167 xmonad $ myConfig
165 168
166autostart = [ spawnKeychain 169autostart = [ spawnKeychain
170 , spawnOnce "urxvtd -o"
167 ] 171 ]
168 172
169spawnKeychain = safeSpawn "urxvt" $ ["-e", "keychain"] ++ keys 173spawnKeychain = do
170 where 174 home <- liftIO getHomeDirectory
171 keys = map ("~/.ssh/id_" ++) ["ed25519", "ecdsa", "rsa"] 175 let keys = map ((home </>) . ("/.ssh/id_" ++)) ["ed25519", "ecdsa", "rsa"]
176 safeSpawn "urxvt" $ ["-e", "keychain"] ++ keys
172 177
173assimilateKeychain :: X () 178assimilateKeychain :: X ()
174assimilateKeychain = liftIO $ assimilateKeychain' >> return () 179assimilateKeychain = liftIO $ assimilateKeychain' >> return ()