summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Plugins
diff options
context:
space:
mode:
authorRob Whitaker <dev@robwhitaker.com>2022-03-29 14:00:41 -0400
committerRob Whitaker <dev@robwhitaker.com>2022-03-29 14:00:41 -0400
commit28e51ce251bb7ecf8d688c0bdfb701c94b1fa7e2 (patch)
tree6d01a69af157148ccf75bd9648aacdb15564fbd7 /src/Xmobar/Plugins
parent2757086b03ee4b1ea32a80a8dc4246ef3258ca0b (diff)
downloadxmobar-28e51ce251bb7ecf8d688c0bdfb701c94b1fa7e2.tar.gz
xmobar-28e51ce251bb7ecf8d688c0bdfb701c94b1fa7e2.tar.bz2
Apply hlint suggestions to MultiCoreTemp
Diffstat (limited to 'src/Xmobar/Plugins')
-rw-r--r--src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs b/src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs
index 5bd9df3..abc9684 100644
--- a/src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs
+++ b/src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs
@@ -122,7 +122,7 @@ corePaths :: Maybe String -> IO [String]
corePaths s = do ps <- case s of
Just pth -> return [pth]
_ -> hwmonPaths
- cps <- concat <$> traverse (flip getMatchingPathsInDir corePathMatcher) ps
+ cps <- concat <$> traverse (`getMatchingPathsInDir` corePathMatcher) ps
ls <- filterM doesFileExist cps
cls <- filterM isLabelFromCore ls
return $ map labelToCore cls