Snoooopy/dtos-dotfiles
1
0
Fork 0
mirror of https://gitlab.com/dwt1/dotfiles.git synced 2026-04-23 03:20:26 +10:00
Code Issues Packages Projects Releases Wiki Activity

Minor edits.

Browse Source
This commit is contained in:
Derek Taylor
2020-06-06 18:41:36 -05:00
parent 271fd84de3
commit 208bfc339c
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
.xmonad/xmonad.hs
View File

@@ -218,7 +218,7 @@ dtXPConfig = def
calcPrompt :: XPConfig -> String -> X () calcPrompt :: XPConfig -> String -> X ()
calcPrompt c ans = calcPrompt c ans =
inputPrompt c (trim ans) ?+ \input -> inputPrompt c (trim ans) ?+ \input ->
liftIO(runProcessWithInput "whereis" [input] "") >>= calcPrompt c liftIO(runProcessWithInput "qalc" [input] "") >>= calcPrompt c
where where
trim = f . f trim = f . f
where f = reverse . dropWhile isSpace where f = reverse . dropWhile isSpace