src/Bottom.hs


1
2
3
4
5
6
7
8
9
10
11

import Xmobar
import Config
import qualified Music

import System.Environment (getArgs)


main :: IO ()
main = do
  args <- getArgs
  palette >>= configFromArgs . Music.config "spotify" >>= xmobar