diff options
| author | jao <jao@gnu.org> | 2022-09-11 03:25:59 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-09-11 03:26:51 +0100 |
| commit | d579c840a5038d45c4fecde84dc99d6b14677e20 (patch) | |
| tree | 56922a65f68af15100906ccaa042648f2bf524dc /src/Xmobar/X11/Draw.hs | |
| parent | 5df496dfff0d081a2e3448affc50a016f71b57b2 (diff) | |
| download | xmobar-d579c840a5038d45c4fecde84dc99d6b14677e20.tar.gz xmobar-d579c840a5038d45c4fecde84dc99d6b14677e20.tar.bz2 | |
fix for the default, non-cairo build
Diffstat (limited to 'src/Xmobar/X11/Draw.hs')
| -rw-r--r-- | src/Xmobar/X11/Draw.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Xmobar/X11/Draw.hs b/src/Xmobar/X11/Draw.hs index 643ec13..2d61b67 100644 --- a/src/Xmobar/X11/Draw.hs +++ b/src/Xmobar/X11/Draw.hs @@ -54,10 +54,10 @@ drawInWin conf bound@(Rectangle _ _ wid ht) segments = do liftIO $ setGraphicsExposures d gc False #if defined(XFT) || defined(CAIRO) - let conf = config r - alph = alpha conf + let xconf = config r + alph = alpha xconf when (alph < 255) - (liftIO $ drawBackground d p (bgColor conf) alph (Rectangle 0 0 wid ht)) + (liftIO $ drawBackground d p (bgColor xconf) alph (Rectangle 0 0 wid ht)) #endif #ifdef CAIRO |