src/XMonad/Custom/Misc.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

module XMonad.Custom.Misc
    ( Applications (..)
    , customApplications
    ) where

data Applications = Applications { term    :: String
                                 , browser :: String
                                 , top     :: String
                                 , mixer   :: String
                                 , notify  :: String
                                 } deriving (Show)

customApplications :: Applications
customApplications = Applications { term    = "/usr/bin/urxvtc"
                                  , browser = "/usr/bin/qutebrowser"
                                  , top     = "/usr/bin/htop"
                                  , mixer   = "/usr/bin/alsamixer"
                                  , notify  = "/usr/bin/notify-send"
                                  }