twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-08-29 02:13:48 -07:00
Code Issues Packages Projects Releases Wiki Activity

Use new terminal config option

Browse Source
This commit is contained in:
Spencer Janssen
2007-10-24 11:02:19 +00:00
parent 32a01355bf
commit c65b9c06b9
3 changed files with 10 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SshPrompt.hs
View File

@@ -26,7 +26,7 @@ import Data.Maybe (Maybe(..), catMaybes)
import Data.Set (toList, fromList)
import System.Directory (doesFileExist)
import XMonad (X, io)
import XMonadContrib.Run (runInXTerm)
import XMonadContrib.Run (runInTerm)
import XMonadContrib.XPrompt (XPrompt(..), XPConfig, mkXPrompt,
mkComplFunFromList)
-- $usage
@@ -55,7 +55,7 @@ sshPrompt c = do
mkXPrompt Ssh c (mkComplFunFromList sc) ssh
ssh :: String -> X ()
ssh s = runInXTerm ("ssh " ++ s)
ssh s = runInTerm ("ssh " ++ s)
sshComplList :: IO [String]
sshComplList = (sort . toList . fromList) `fmap` liftM2 (++) sshComplListLocal sshComplListGlobal