summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@ing.unitn.it>2008-04-29 12:28:48 +0200
committerAndrea Rossato <andrea.rossato@ing.unitn.it>2008-04-29 12:28:48 +0200
commitf41dc7b572acf85907a6cb5fdc6ecfee715621df (patch)
treefd666b3832d74c2ff275b0483dc4dba95f47998f
parent14ce2a41a166fe0282f0fc19fad81239590b441a (diff)
downloadxmobar-f41dc7b572acf85907a6cb5fdc6ecfee715621df.tar.gz
xmobar-f41dc7b572acf85907a6cb5fdc6ecfee715621df.tar.bz2
style
darcs-hash:20080429102848-d6583-54a5167beb89b3e330012b2f92e786e6f456cbe6.gz
-rw-r--r--Plugins/Monitors.hs2
-rw-r--r--Plugins/Monitors/Weather.hs22
2 files changed, 12 insertions, 12 deletions
diff --git a/Plugins/Monitors.hs b/Plugins/Monitors.hs
index 690e198..07662be 100644
--- a/Plugins/Monitors.hs
+++ b/Plugins/Monitors.hs
@@ -55,7 +55,7 @@ instance Exec Monitors where
alias (Swap _ _) = "swap"
alias (Cpu _ _) = "cpu"
alias (Battery _ _) = "battery"
- alias (BatteryP _ _ _) = "battery"
+ alias (BatteryP _ _ _)= "battery"
alias (CpuFreq _ _) = "cpufreq"
alias (CoreTemp _ _) = "coretemp"
start (Weather s a r) = runM (a ++ [s]) weatherConfig runWeather r
diff --git a/Plugins/Monitors/Weather.hs b/Plugins/Monitors/Weather.hs
index e166b74..9a60876 100644
--- a/Plugins/Monitors/Weather.hs
+++ b/Plugins/Monitors/Weather.hs
@@ -45,18 +45,18 @@ weatherConfig = mkMConfig
data WeatherInfo =
WI { stationPlace :: String
, stationState :: String
- , year :: String
- , month :: String
- , day :: String
- , hour :: String
- , wind :: String
- , visibility :: String
+ , year :: String
+ , month :: String
+ , day :: String
+ , hour :: String
+ , wind :: String
+ , visibility :: String
, skyCondition :: String
- , tempC :: Int
- , tempF :: Int
- , dewPoint :: String
- , humidity :: Int
- , pressure :: Int
+ , tempC :: Int
+ , tempF :: Int
+ , dewPoint :: String
+ , humidity :: Int
+ , pressure :: Int
} deriving (Show)
pTime :: Parser (String, String, String, String)