diff options
| author | Martin Perner <martin@perner.cc> | 2011-09-19 12:07:33 +0200 |
|---|---|---|
| committer | Martin Perner <martin@perner.cc> | 2011-09-19 12:07:33 +0200 |
| commit | 1dabd20fb794567d3413f562e590fa5aa04144a0 (patch) | |
| tree | f49a392b22363eeff2a0b5068032b4376cffbc11 /src/Main.hs | |
| parent | 8833a8166387075d75ee15690a58cbd2aacf2a67 (diff) | |
| download | xmobar-1dabd20fb794567d3413f562e590fa5aa04144a0.tar.gz xmobar-1dabd20fb794567d3413f562e590fa5aa04144a0.tar.bz2 | |
Refactored eventLoop
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index e8efd61..364fa02 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -57,7 +57,7 @@ main = do cls <- mapM (parseTemplate conf) (splitTemplate conf) vars <- mapM (mapM startCommand) cls (r,w) <- createWin d fs conf - eventLoop (XConf d r w fs conf) vars + startLoop (XConf d r w fs conf) vars -- | Splits the template in its parts splitTemplate :: Config -> [String] |