aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/XMobarLog.hs
diff options
context:
space:
mode:
authorJosh Rahm <joshuarahm@gmail.com>2022-04-16 00:20:03 -0600
committerJosh Rahm <joshuarahm@gmail.com>2022-04-16 00:20:03 -0600
commitd1a00e6e42b4b513f7de66a9e710f62faca2ef00 (patch)
treedd16af5c820d5567df7f1bb8a7a2ca2ac0950d47 /src/Rahm/Desktop/XMobarLog.hs
parent7a5051f7955a8b4e69b2c28b5a9b34f9730e21f0 (diff)
downloadrde-d1a00e6e42b4b513f7de66a9e710f62faca2ef00.tar.gz
rde-d1a00e6e42b4b513f7de66a9e710f62faca2ef00.tar.bz2
rde-d1a00e6e42b4b513f7de66a9e710f62faca2ef00.zip
fix some hlint warnings
Diffstat (limited to 'src/Rahm/Desktop/XMobarLog.hs')
-rw-r--r--src/Rahm/Desktop/XMobarLog.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Rahm/Desktop/XMobarLog.hs b/src/Rahm/Desktop/XMobarLog.hs
index 4f8bbb8..f2cccf8 100644
--- a/src/Rahm/Desktop/XMobarLog.hs
+++ b/src/Rahm/Desktop/XMobarLog.hs
@@ -60,7 +60,7 @@ xMobarLogHook (XMobarLog xmproc) = do
tell $ "<fc=#404040>│ </fc><fc=#a0a0a0><fn=3>"
tell $ title
tell $ "</fn></fc>"
-
+
where
toAction [ch] | (ch >= 'A' && ch <= 'Z') ||
(ch >= 'a' && ch <= 'z') ||