diff options
| author | Reto Habluetzel <rethab@rethab.ch> | 2012-09-04 07:10:26 +0200 |
|---|---|---|
| committer | Reto Habluetzel <rethab@rethab.ch> | 2012-09-04 07:10:26 +0200 |
| commit | 431b8eaffd865593bed4e1db1843452a1f1fe64c (patch) | |
| tree | ff6cfa4826d9522f2ebba61519d0efbafc0e2ebe /src/Plugins/Monitors.hs | |
| parent | 2cf7e19b8be5e892c03bd95cf4e1acffe0e53e66 (diff) | |
| download | xmobar-431b8eaffd865593bed4e1db1843452a1f1fe64c.tar.gz xmobar-431b8eaffd865593bed4e1db1843452a1f1fe64c.tar.bz2 | |
automatic detection of devices using /sys/class/net directory
Diffstat (limited to 'src/Plugins/Monitors.hs')
| -rw-r--r-- | src/Plugins/Monitors.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Plugins/Monitors.hs b/src/Plugins/Monitors.hs index bea91eb..009da68 100644 --- a/src/Plugins/Monitors.hs +++ b/src/Plugins/Monitors.hs @@ -50,7 +50,7 @@ import Plugins.Monitors.Mpris data Monitors = Weather Station Args Rate | Network Interface Args Rate - | DynNetwork [Interface] Args Rate + | DynNetwork Args Rate | BatteryP [String] Args Rate | DiskU DiskSpec Args Rate | DiskIO DiskSpec Args Rate @@ -96,7 +96,7 @@ type DiskSpec = [(String, String)] instance Exec Monitors where alias (Weather s _ _) = s alias (Network i _ _) = i - alias (DynNetwork _ _ _) = "dynnetwork" + alias (DynNetwork _ _) = "dynnetwork" alias (Thermal z _ _) = z alias (ThermalZone z _ _) = "thermal" ++ show z alias (Memory _ _) = "memory" @@ -128,7 +128,7 @@ instance Exec Monitors where alias (Mpris2 _ _ _) = "mpris2" #endif start (Network i a r) = startNet i a r - start (DynNetwork is a r) = startDynNet is a r + start (DynNetwork a r) = startDynNet a r start (Cpu a r) = startCpu a r start (MultiCpu a r) = startMultiCpu a r start (TopProc a r) = startTop a r |