diff options
| author | jao <jao@gnu.org> | 2022-09-11 02:36:35 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-09-11 02:52:00 +0100 |
| commit | 5df496dfff0d081a2e3448affc50a016f71b57b2 (patch) | |
| tree | 4029a5c23d84a387a8e2b20a7421cad1462ed8e8 /src/Xmobar/Config/Types.hs | |
| parent | d0f547be5380ec14cc334b15a530ba869668581a (diff) | |
| download | xmobar-5df496dfff0d081a2e3448affc50a016f71b57b2.tar.gz xmobar-5df496dfff0d081a2e3448affc50a016f71b57b2.tar.bz2 | |
cairo: linting
Diffstat (limited to 'src/Xmobar/Config/Types.hs')
| -rw-r--r-- | src/Xmobar/Config/Types.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Xmobar/Config/Types.hs b/src/Xmobar/Config/Types.hs index 216ac19..3f2297f 100644 --- a/src/Xmobar/Config/Types.hs +++ b/src/Xmobar/Config/Types.hs @@ -77,12 +77,12 @@ data Config = indexedFont :: Config -> Int -> String indexedFont config idx = if idx < 1 || idx > length (additionalFonts config) - then font config else (additionalFonts config) !! (idx - 1) + then font config else additionalFonts config !! (idx - 1) indexedOffset :: Config -> Int -> Int indexedOffset config idx = if idx < 1 || idx > length (textOffsets config) - then textOffset config else (textOffsets config) !! (idx - 1) + then textOffset config else textOffsets config !! (idx - 1) data XPosition = Top | TopH Int |