aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@unibz.it>2007-11-19 01:03:57 +0100
committerAndrea Rossato <andrea.rossato@unibz.it>2007-11-19 01:03:57 +0100
commit790a2c53738506514881502116e51d5496a7d2c6 (patch)
treeb2203482c0f3eb6b218fd277b3dce7cfea637958
parentec255a33cd8fa98e8dc325c475ba4d2c4e7a53d9 (diff)
downloadXMonadContrib-790a2c53738506514881502116e51d5496a7d2c6.tar.gz
XMonadContrib-790a2c53738506514881502116e51d5496a7d2c6.tar.xz
XMonadContrib-790a2c53738506514881502116e51d5496a7d2c6.zip
Prompt: comment only
darcs-hash:20071119000357-32816-ad0af5478f4d4214b84d1a43cf9ca66efba445a1.gz
-rw-r--r--XMonad/Prompt.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs
index dd88d75..01bb31c 100644
--- a/XMonad/Prompt.hs
+++ b/XMonad/Prompt.hs
@@ -436,7 +436,7 @@ printPrompt drw = do
let (gc,(c,(d,fs))) = (gcon &&& config &&& dpy &&& fontS) st
(prt,(com,off)) = (show . xptype &&& command &&& offset) st
str = prt ++ com
- -- compose the string in 3 parts: till the cursor, the cursor and the rest
+ -- break the string in 3 parts: till the cursor, the cursor and the rest
(f,p,ss) = if off >= length com
then (str, " ","") -- add a space: it will be our cursor ;-)
else let (a,b) = (splitAt off com)