diff options
author | Alexander Polakov <plhk@sdf.org> | 2013-02-02 04:59:36 +0400 |
---|---|---|
committer | Alexander Polakov <plhk@sdf.org> | 2013-02-03 15:41:09 +0400 |
commit | 7160bbed9870247268469330c18a5e7708eb12a3 (patch) | |
tree | e29110929981f40c825ee09f2786897b1d2d9670 /src/Main.hs | |
parent | 5c6cb344e0221b20b38ce1decf03029e9051417b (diff) | |
download | xmobar-7160bbed9870247268469330c18a5e7708eb12a3.tar.gz xmobar-7160bbed9870247268469330c18a5e7708eb12a3.tar.bz2 |
Implement icon caching
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index 5ef5db6..1438ab5 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -26,6 +26,7 @@ import Config import XUtil import Data.List (intercalate) +import qualified Data.Map as Map import Paths_xmobar (version) import Data.Version (showVersion) @@ -60,7 +61,8 @@ main = do sig <- setupSignalHandler vars <- mapM (mapM $ startCommand sig) cls (r,w) <- createWin d fs conf - startLoop (XConf d r w fs conf) sig vars + let ic = Map.empty + startLoop (XConf d r w fs ic conf) sig vars -- | Splits the template in its parts splitTemplate :: Config -> [String] |