diff options
author | jao <jao@gnu.org> | 2017-04-29 02:09:24 +0200 |
---|---|---|
committer | jao <jao@gnu.org> | 2017-04-29 02:09:24 +0200 |
commit | e41fd61bdeac8779fa24050cc0d44714f7c90f1d (patch) | |
tree | f724480c121a1246c942ed913f167fa71a9e2564 /src/Window.hs | |
parent | 938a8d8307c1c4794c5fcf269c587c3c5c5e70df (diff) | |
download | xmobar-e41fd61bdeac8779fa24050cc0d44714f7c90f1d.tar.gz xmobar-e41fd61bdeac8779fa24050cc0d44714f7c90f1d.tar.bz2 |
hlint configuration
Diffstat (limited to 'src/Window.hs')
-rw-r--r-- | src/Window.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Window.hs b/src/Window.hs index 3c3981e..11ea82e 100644 --- a/src/Window.hs +++ b/src/Window.hs @@ -1,7 +1,7 @@ ----------------------------------------------------------------------------- -- | -- Module : Window --- Copyright : (c) 2011-16 Jose A. Ortega Ruiz +-- Copyright : (c) 2011-17 Jose A. Ortega Ruiz -- : (c) 2012 Jochen Keil -- License : BSD-style (see LICENSE) -- @@ -197,7 +197,7 @@ showWindow r c d w = do isMapped :: Display -> Window -> IO Bool isMapped d w = ism <$> getWindowAttributes d w - where ism (WindowAttributes { wa_map_state = wms }) = wms /= waIsUnmapped + where ism WindowAttributes { wa_map_state = wms } = wms /= waIsUnmapped borderOffset :: (Integral a) => Border -> Int -> a borderOffset b lw = |