summaryrefslogtreecommitdiffhomepage
path: root/Plugins/Monitors/CoreCommon.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Plugins/Monitors/CoreCommon.hs')
-rw-r--r--Plugins/Monitors/CoreCommon.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/Monitors/CoreCommon.hs b/Plugins/Monitors/CoreCommon.hs
index f31ee42..5dceb33 100644
--- a/Plugins/Monitors/CoreCommon.hs
+++ b/Plugins/Monitors/CoreCommon.hs
@@ -43,7 +43,7 @@ retrieveData dir file pattern divisor = do
values <- mapM (showWithColors show) $ map conversion contents
parseTemplate values
where
- getGuts file = withFile file ReadMode hGetLine
+ getGuts f = withFile f ReadMode hGetLine
dirCount path str = getDirectoryContents path
>>= return . length
. filter (\s -> str `isPrefixOf` s