aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Prompt
diff options
context:
space:
mode:
authorc.lopez <c.lopez@kmels.net>2012-08-11 12:48:05 +0200
committerc.lopez <c.lopez@kmels.net>2012-08-11 12:48:05 +0200
commit8c764f7361104d8a5505d86be8421d060e645532 (patch)
tree552ee4f6995f064a92a149e73fe3dd27addddcef /XMonad/Prompt
parent91a8eb1a3043515cd6960815ab9aeb9fbed30b0d (diff)
downloadXMonadContrib-8c764f7361104d8a5505d86be8421d060e645532.tar.gz
XMonadContrib-8c764f7361104d8a5505d86be8421d060e645532.tar.xz
XMonadContrib-8c764f7361104d8a5505d86be8421d060e645532.zip
Correctly get the autocompletion item when alwaysHighlight in XMonad.Prompt is True
Ignore-this: fa2600df210c7d3472a797f19fb31a7 darcs-hash:20120811104805-c3db2-130ba7583c5498a5d8b30f075d394db203f65329.gz
Diffstat (limited to 'XMonad/Prompt')
-rw-r--r--XMonad/Prompt/Shell.hs24
1 files changed, 12 insertions, 12 deletions
diff --git a/XMonad/Prompt/Shell.hs b/XMonad/Prompt/Shell.hs
index d8aa272..c391ca3 100644
--- a/XMonad/Prompt/Shell.hs
+++ b/XMonad/Prompt/Shell.hs
@@ -29,18 +29,18 @@ module XMonad.Prompt.Shell
, split
) where
-import Codec.Binary.UTF8.String (encodeString)
-import Control.Exception
-import Control.Monad (forM)
-import Data.List (isPrefixOf)
-import Prelude hiding (catch)
-import System.Directory (doesDirectoryExist, getDirectoryContents)
-import System.Environment (getEnv)
-import System.Posix.Files (getFileStatus, isDirectory)
-
-import XMonad.Util.Run
-import XMonad hiding (config)
-import XMonad.Prompt
+import Codec.Binary.UTF8.String (encodeString)
+import Control.Exception
+import Control.Monad (forM)
+import Data.List (isPrefixOf)
+import Prelude hiding (catch)
+import System.Directory (doesDirectoryExist, getDirectoryContents)
+import System.Environment (getEnv)
+import System.Posix.Files (getFileStatus, isDirectory)
+
+import XMonad hiding (config)
+import XMonad.Prompt
+import XMonad.Util.Run
econst :: Monad m => a -> IOException -> m a
econst = const . return