diff options
author | Reto Habluetzel <rethab@rethab.ch> | 2012-09-14 23:12:40 +0200 |
---|---|---|
committer | Reto Habluetzel <rethab@rethab.ch> | 2012-09-14 23:12:40 +0200 |
commit | 1b38bbadb62fa06f5e00ee89e0384591dc522325 (patch) | |
tree | 05ce0d9ea461d215a85b94d9a8cb47e1f1c0954b /src/Plugins/Monitors | |
parent | 7e5e4bca3f7b35ec5569c28b4a86546a1234eb51 (diff) | |
download | xmobar-1b38bbadb62fa06f5e00ee89e0384591dc522325.tar.gz xmobar-1b38bbadb62fa06f5e00ee89e0384591dc522325.tar.bz2 |
better readable code
Diffstat (limited to 'src/Plugins/Monitors')
-rw-r--r-- | src/Plugins/Monitors/Net.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/Net.hs b/src/Plugins/Monitors/Net.hs index 9ea4346..b8adc74 100644 --- a/src/Plugins/Monitors/Net.hs +++ b/src/Plugins/Monitors/Net.hs @@ -135,7 +135,7 @@ runNet :: NetDevRef -> String -> [String] -> Monitor String runNet nref i _ = io (parseNet nref i) >>= printNet parseNets :: [(NetDevRef, String)] -> IO [NetDev] -parseNets = mapM (\(ref, i) -> parseNet ref i) +parseNets = mapM $ \(ref, i) -> parseNet ref i runNets :: [(NetDevRef, String)] -> [String] -> Monitor String runNets refs _ = io (parseActive refs) >>= printNet |