diff options
author | jao <jao@gnu.org> | 2018-12-10 01:36:46 +0000 |
---|---|---|
committer | jao <jao@gnu.org> | 2018-12-10 01:36:46 +0000 |
commit | 48c0e1ebcc0e6a7c9ae302f44c814508bfda7b6a (patch) | |
tree | d6a4ff080420e2e36fe1db68c51f4dfb30069169 /src/Bottom.hs | |
parent | 0b8f1901f6e955fb1f0f42b0b6b598bbf8a2ae12 (diff) | |
download | xmobar-config-48c0e1ebcc0e6a7c9ae302f44c814508bfda7b6a.tar.gz xmobar-config-48c0e1ebcc0e6a7c9ae302f44c814508bfda7b6a.tar.bz2 |
Using the new Xmobar.configFromArgs
Diffstat (limited to 'src/Bottom.hs')
-rw-r--r-- | src/Bottom.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Bottom.hs b/src/Bottom.hs index bfc4ecb..4ff7265 100644 --- a/src/Bottom.hs +++ b/src/Bottom.hs @@ -8,7 +8,7 @@ import System.Environment (getArgs) main :: IO () main = do args <- getArgs - let mpris = if null args then "spotify" else head args + let mpris = if null args then "spotify" else last args if mpris == "mpd" - then palette >>= xmobar . MPD.config - else palette >>= xmobar . (Mpris.config mpris) + then palette >>= configFromArgs . MPD.config >>= xmobar + else palette >>= configFromArgs . (Mpris.config mpris) >>= xmobar |