diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-17 22:22:01 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-17 22:22:01 +0200 |
| commit | ca61dc383dfdb1e92c0fdc33730992e9a5589439 (patch) | |
| tree | 26ddc63f8253d1b3bcd9e6edf806562730a2adc7 | |
| parent | c5f7a0ab918ee2e4296263b447157ea3bfcf180e (diff) | |
| download | XMonadContrib-ca61dc383dfdb1e92c0fdc33730992e9a5589439.tar.gz XMonadContrib-ca61dc383dfdb1e92c0fdc33730992e9a5589439.tar.xz XMonadContrib-ca61dc383dfdb1e92c0fdc33730992e9a5589439.zip | |
Remove RunInXTerm in favor of Run
darcs-hash:20071017202201-a5988-8130b054c29244d0fb2f5887eeb5285865c1a478.gz
| -rw-r--r-- | MetaModule.hs | 1 | ||||
| -rw-r--r-- | RunInXTerm.hs | 31 | ||||
| -rw-r--r-- | SshPrompt.hs | 2 |
3 files changed, 2 insertions, 32 deletions
diff --git a/MetaModule.hs b/MetaModule.hs index 465e5e0..f90dada 100644 --- a/MetaModule.hs +++ b/MetaModule.hs @@ -60,6 +60,7 @@ import XMonadContrib.ResizableTile () import XMonadContrib.Roledex () import XMonadContrib.RotSlaves () import XMonadContrib.RotView () +import XMonadContrib.Run () import XMonadContrib.SetWMName () import XMonadContrib.ShellPrompt () import XMonadContrib.SimpleDate () diff --git a/RunInXTerm.hs b/RunInXTerm.hs deleted file mode 100644 index b0eb607..0000000 --- a/RunInXTerm.hs +++ /dev/null @@ -1,31 +0,0 @@ ------------------------------------------------------------------------------ --- | --- Module : XMonadContrib.RunInXTerm --- Copyright : (C) 2007 Andrea Rossato --- License : BSD3 --- --- Maintainer : andrea.rossato@unibz.it --- Stability : unstable --- Portability : unportable --- --- A simple module to launch commands in an X terminal --- from XMonad --- ------------------------------------------------------------------------------ - -module XMonadContrib.RunInXTerm ( - -- * Usage - -- $usage - runInXTerm - ) where - -import XMonad -import System.Environment - --- $usage --- For an example usage see "XMonadContrib.SshPrompt" - -runInXTerm :: String -> X () -runInXTerm com = do - c <- io $ catch (getEnv "XTERMCMD") (const $ return "xterm") - spawn ("exec " ++ c ++ " -e " ++ com) diff --git a/SshPrompt.hs b/SshPrompt.hs index 94d8f93..5ff966b 100644 --- a/SshPrompt.hs +++ b/SshPrompt.hs @@ -20,7 +20,7 @@ module XMonadContrib.SshPrompt ( import XMonad import XMonadContrib.XPrompt -import XMonadContrib.RunInXTerm +import XMonadContrib.Run import Control.Monad import System.Directory |