From 1b38bbadb62fa06f5e00ee89e0384591dc522325 Mon Sep 17 00:00:00 2001 From: Reto Habluetzel Date: Fri, 14 Sep 2012 23:12:40 +0200 Subject: better readable code --- src/Plugins/Monitors/Net.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.2.3