From 076cdd9852e5520f0910480d9dcbdc529b358a09 Mon Sep 17 00:00:00 2001
From: gwern0 <gwern0@gmail.com>
Date: Sun, 20 Jun 2010 19:52:15 +0200
Subject: XMonad.Util.Run: improve linking and rearrange docs

Ignore-this: d7b76532309237ddfa22c31a1f1ef5a4

darcs-hash:20100620175215-f7719-c08761496e5cbc2ff0d3f80218089dc4a92b0460.gz
---
 XMonad/Util/Run.hs | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'XMonad/Util')

diff --git a/XMonad/Util/Run.hs b/XMonad/Util/Run.hs
index 1d03ff4..77c3b0c 100644
--- a/XMonad/Util/Run.hs
+++ b/XMonad/Util/Run.hs
@@ -88,7 +88,7 @@ runProcessWithInputAndWait cmd args input timeout = io $ do
 seconds :: Rational -> Int
 seconds = fromEnum . (* 1000000)
 
-{- | 'safeSpawn' bypasses "XMonad.Core"'s 'spawn' command, because spawn passes
+{- | 'safeSpawn' bypasses 'spawn', because spawn passes
 strings to \/bin\/sh to be interpreted as shell commands. This is
 often what one wants, but in many cases the passed string will contain
 shell metacharacters which one does not want interpreted as such (URLs
@@ -96,8 +96,7 @@ particularly often have shell metacharacters like \'&\' in them). In
 this case, it is more useful to specify a file or program to be run
 and a string to give it as an argument so as to bypass the shell and
 be certain the program will receive the string as you typed it.
-unsafeSpawn is internally an alias for XMonad's 'spawn', to remind one that use
-of it can be, well, unsafe.
+
 Examples:
 
 > , ((modm, xK_Print), unsafeSpawn "import -window root $HOME/xwd-$(date +%s)$$.png")
@@ -112,12 +111,14 @@ safeSpawn prog args = liftIO $ do
     try $ xfork $ executeFile prog True args Nothing :: IO (Either SomeException ProcessID)
     return ()
 
--- | Like 'safeSpawn', but only takes a program (and no arguments for it). eg.
+-- | Simplified 'safeSpawn'; only takes a program (and no arguments):
 --
--- > safeSpawnProg "firefox"
+-- > , ((modm, xK_d    ), safeSpawnProg "firefox")
 safeSpawnProg :: MonadIO m => FilePath -> m ()
 safeSpawnProg = flip safeSpawn []
 
+-- | An alias for 'spawn'; the name emphasizes that one is calling out to a 
+--   Turing-complete interpreter which may do things one dislikes; for details, see 'safeSpawn'.
 unsafeSpawn :: MonadIO m => String -> m ()
 unsafeSpawn = spawn
 
-- 
cgit v1.2.3