Formatting changes
This commit is contained in:
parent
d5c86cddee
commit
2ad7555b2d
@ -4,11 +4,22 @@ module XMonad.Config.MasseR.ExtraConfig where
|
|||||||
import GHC.Generics (Generic)
|
import GHC.Generics (Generic)
|
||||||
import Data.Text (Text)
|
import Data.Text (Text)
|
||||||
|
|
||||||
data Applications = Applications { browser :: FilePath, launcher :: FilePath, prompt :: FilePath, screenshot :: FilePath, urxvt :: FilePath } deriving (Show, Generic)
|
data Applications =
|
||||||
|
Applications { browser :: FilePath
|
||||||
|
, launcher :: FilePath
|
||||||
|
, prompt :: FilePath
|
||||||
|
, screenshot :: FilePath
|
||||||
|
, urxvt :: FilePath
|
||||||
|
} deriving (Show, Generic)
|
||||||
|
|
||||||
data TopicRule = TopicRule { topicName :: Text
|
data TopicRule =
|
||||||
, topicHome :: Maybe Text
|
TopicRule { topicName :: Text
|
||||||
, topicAction :: Maybe Text }
|
, topicHome :: Maybe Text
|
||||||
deriving (Show, Generic)
|
, topicAction :: Maybe Text
|
||||||
|
}
|
||||||
|
deriving (Show, Generic)
|
||||||
|
|
||||||
data ExtraConfig = ExtraConfig { applications :: Applications, topics :: [ TopicRule ] } deriving (Show, Generic)
|
data ExtraConfig =
|
||||||
|
ExtraConfig { applications :: Applications
|
||||||
|
, topics :: [ TopicRule ] }
|
||||||
|
deriving (Show, Generic)
|
||||||
|
Loading…
Reference in New Issue
Block a user