diff options
author | c.lopez <c.lopez@kmels.net> | 2012-08-11 12:48:05 +0200 |
---|---|---|
committer | c.lopez <c.lopez@kmels.net> | 2012-08-11 12:48:05 +0200 |
commit | 8c764f7361104d8a5505d86be8421d060e645532 (patch) | |
tree | 552ee4f6995f064a92a149e73fe3dd27addddcef /XMonad/Prompt | |
parent | 91a8eb1a3043515cd6960815ab9aeb9fbed30b0d (diff) | |
download | XMonadContrib-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.hs | 24 |
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 |