diff options
| author | Jose A Ortega Ruiz <jao@gnu.org> | 2010-02-21 21:38:09 +0100 |
|---|---|---|
| committer | Jose A Ortega Ruiz <jao@gnu.org> | 2010-02-21 21:38:09 +0100 |
| commit | d56e2da928343b9cadb8e034036926e089ad861e (patch) | |
| tree | 9e316ea2523d97f8f208a580de9ddafc35412052 /Plugins/Monitors.hs | |
| parent | 7f9eb02f5c420d8f9e425310d3982145649dbba1 (diff) | |
| download | xmobar-d56e2da928343b9cadb8e034036926e089ad861e.tar.gz xmobar-d56e2da928343b9cadb8e034036926e089ad861e.tar.bz2 | |
New Wireless monitor
Ignore-this: b1b66ffa9077f8d41a5c0e962ee0bff3
darcs-hash:20100221203809-748be-71bc1951a2eb8164b0043725bcb707f42e530ded.gz
Diffstat (limited to 'Plugins/Monitors.hs')
| -rw-r--r-- | Plugins/Monitors.hs | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/Plugins/Monitors.hs b/Plugins/Monitors.hs index cba7332..2aff132 100644 --- a/Plugins/Monitors.hs +++ b/Plugins/Monitors.hs @@ -1,3 +1,5 @@ +{-# LANGUAGE CPP #-} + ----------------------------------------------------------------------------- -- | -- Module : Xmobar.Plugins.Monitors @@ -29,6 +31,9 @@ import Plugins.Monitors.CpuFreq import Plugins.Monitors.CoreTemp import Plugins.Monitors.Disk import Plugins.Monitors.Top +#ifdef IWLIB +import Plugins.Monitors.Wireless +#endif data Monitors = Weather Station Args Rate | Network Interface Args Rate @@ -45,6 +50,9 @@ data Monitors = Weather Station Args Rate | CoreTemp Args Rate | TopCpu Args Rate | TopMem Args Rate +#ifdef IWLIB + | Wireless Interface Args Rate +#endif deriving (Show,Read,Eq) type Args = [String] @@ -72,6 +80,10 @@ instance Exec Monitors where alias (CoreTemp _ _) = "coretemp" alias (DiskU _ _ _) = "disku" alias (DiskIO _ _ _) = "diskio" +#ifdef IWLIB + alias (Wireless i _ _) = i ++ "wi" + start (Wireless i a r) = runM (a ++ [i]) wirelessConfig runWireless r +#endif start (Weather s a r) = runM (a ++ [s]) weatherConfig runWeather r start (Network i a r) = runM (a ++ [i]) netConfig runNet r start (Thermal z a r) = runM (a ++ [z]) thermalConfig runThermal r |