From 4e8ec5a4c86873018f3ba33669fb9affff280d6e Mon Sep 17 00:00:00 2001 From: jao Date: Mon, 26 Aug 2024 21:41:54 +0100 Subject: fallback to weather in weatherS --- src/Xmobar/Plugins/Monitors/Weather.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Xmobar/Plugins/Monitors/Weather.hs b/src/Xmobar/Plugins/Monitors/Weather.hs index 550779b..6b5c353 100644 --- a/src/Xmobar/Plugins/Monitors/Weather.hs +++ b/src/Xmobar/Plugins/Monitors/Weather.hs @@ -231,8 +231,8 @@ formatWeather opts sks [WI st ss y m d h wind v sk we tC tF dC dF r p] = do let WindInfo wc wa wm wk wkh wms = wind cel <- showWithColors show tC far <- showWithColors show tF - let sk' = findSk sks (map toLower sk) "" - we' = showWeather (weatherString opts) we + let we' = showWeather (weatherString opts) we + sk' = findSk sks (map toLower sk) we' we'' = findSk sks (map toLower we') sk' parseTemplate [st, ss, y, m, d, h, wc, wa, wm, wk, wkh , wms, v, sk, sk', we', we'', cel, far -- cgit v1.2.3