15 lines
625 B
Haskell
15 lines
625 B
Haskell
{-# LANGUAGE DeriveGeneric #-}
|
|
module XMonad.Config.MasseR.ExtraConfig where
|
|
|
|
import GHC.Generics (Generic)
|
|
import Data.Text (Text)
|
|
|
|
data Applications = Applications { browser :: FilePath, launcher :: FilePath, prompt :: FilePath, screenshot :: FilePath, urxvt :: FilePath } deriving (Show, Generic)
|
|
|
|
data TopicRule = TopicRule { topicName :: Text
|
|
, topicHome :: Maybe Text
|
|
, topicAction :: Maybe Text }
|
|
deriving (Show, Generic)
|
|
|
|
data ExtraConfig = ExtraConfig { applications :: Applications, topics :: [ TopicRule ] } deriving (Show, Generic)
|