diff options
| author | Andrea Rossato <andrea.rossato@unibz.it> | 2007-08-03 15:01:58 +0200 |
|---|---|---|
| committer | Andrea Rossato <andrea.rossato@unibz.it> | 2007-08-03 15:01:58 +0200 |
| commit | 571fdada76d9a5442d6797f8ca439e3fafbd9df4 (patch) | |
| tree | a2d8cd2051e07f79a812a17185ad63160324dd20 /ShellPrompt.hs | |
| parent | 6dd0425408fb0e4d875a4882fde582dc8f1fa15e (diff) | |
| download | XMonadContrib-571fdada76d9a5442d6797f8ca439e3fafbd9df4.tar.gz XMonadContrib-571fdada76d9a5442d6797f8ca439e3fafbd9df4.tar.xz XMonadContrib-571fdada76d9a5442d6797f8ca439e3fafbd9df4.zip | |
Prompts: updated and corrected usage info
darcs-hash:20070803130158-32816-613fcac848ec0874716f794e91194fc302e93810.gz
Diffstat (limited to 'ShellPrompt.hs')
| -rw-r--r-- | ShellPrompt.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/ShellPrompt.hs b/ShellPrompt.hs index 4814c7c..7fc0ce3 100644 --- a/ShellPrompt.hs +++ b/ShellPrompt.hs @@ -25,11 +25,12 @@ to build-depends: base>=2.0, X11>=1.2.1, X11-extras>=0.2, mtl>=1.0, unix>=1.0, readline >= 1.0 2. In Config.hs add: +> import XMonadContrib.XPrompt > import XMonadContrib.ShellPrompt 3. In your keybindings add something like: -> , ((modMask .|. controlMask, xK_x), shellPrompt defaultPromptConfig) +> , ((modMask .|. controlMask, xK_x), shellPrompt defaultXPConfig) -} @@ -53,8 +54,8 @@ shellPrompt c = mkXPrompt Shell c getShellCompl spawn getShellCompl :: String -> IO [String] getShellCompl s | s /= "" && last s /= ' ' = do - fl <- filenameCompletionFunction (last . words $ s) - c <- commandCompletionFunction (last . words $ s) + fl <- filenameCompletionFunction s + c <- commandCompletionFunction s return $ sort . nub $ fl ++ c | otherwise = return [] |