diff options
| -rw-r--r-- | .config/systemd/user/urxvtd.service | 10 | ||||
| -rw-r--r-- | .xmonad/xmonad.hs | 11 |
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] | ||
| 2 | Description=urxvtd - urxvt terminal daemon | ||
| 3 | |||
| 4 | [Service] | ||
| 5 | Type=simple | ||
| 6 | ExecStart=/bin/sh -c urxvtd | ||
| 7 | Restart=always | ||
| 8 | |||
| 9 | [Install] | ||
| 10 | WantedBy=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) | |||
| 40 | import Graphics.X11.ExtraTypes.XF86 | 40 | import Graphics.X11.ExtraTypes.XF86 |
| 41 | import XMonad.Util.Cursor | 41 | import XMonad.Util.Cursor |
| 42 | import XMonad.Actions.Warp | 42 | import XMonad.Actions.Warp |
| 43 | import XMonad.Util.SpawnOnce | ||
| 44 | import System.Directory | ||
| 45 | import System.FilePath | ||
| 43 | 46 | ||
| 44 | import XMonad.Layout.IM | 47 | import XMonad.Layout.IM |
| 45 | 48 | ||
| @@ -164,11 +167,13 @@ main = do | |||
| 164 | xmonad $ myConfig | 167 | xmonad $ myConfig |
| 165 | 168 | ||
| 166 | autostart = [ spawnKeychain | 169 | autostart = [ spawnKeychain |
| 170 | , spawnOnce "urxvtd -o" | ||
| 167 | ] | 171 | ] |
| 168 | 172 | ||
| 169 | spawnKeychain = safeSpawn "urxvt" $ ["-e", "keychain"] ++ keys | 173 | spawnKeychain = 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 | ||
| 173 | assimilateKeychain :: X () | 178 | assimilateKeychain :: X () |
| 174 | assimilateKeychain = liftIO $ assimilateKeychain' >> return () | 179 | assimilateKeychain = liftIO $ assimilateKeychain' >> return () |
