diff options
author | azahi <azahi@teknik.io> | 2018-06-29 10:58:41 +0300 |
---|---|---|
committer | azahi <azahi@teknik.io> | 2018-06-29 10:58:41 +0300 |
commit | e6811f16345abdeb2e97bb19f5e43eb06ace2369 (patch) | |
tree | 52b3d9e2a4ceae7e154fc48c940f3d67a0992a4f /src/XMonad/Custom/Misc.hs | |
parent | Fix resolver issue (diff) |
Bump to 0.2.0.1
Minor code tweaks Add header messages Change indentation Move per-module GHC_OPTIONS to their respective module
Diffstat (limited to '')
-rw-r--r-- | src/XMonad/Custom/Misc.hs | 42 |
1 files changed, 30 insertions, 12 deletions
diff --git a/src/XMonad/Custom/Misc.hs b/src/XMonad/Custom/Misc.hs index 41883b5..dbf7e2c 100644 --- a/src/XMonad/Custom/Misc.hs +++ b/src/XMonad/Custom/Misc.hs @@ -1,19 +1,37 @@ +{-# OPTIONS_GHC -funbox-strict-fields #-} + +----------------------------------------------------------------------------- +-- | +-- Module : XMonad.Custom.Misc +-- Copyright : (c) azahi 2018 +-- License : BSD3-style (see LICENSE) +-- +-- Maintainer : azahi@teknik.io +-- Stability : unstable +-- Portability : unportable +-- +-- Miscellaneous functions, data types and declarations used for 'XMonad.Custom'. +-- +------------------------------------------------------------------------ + module XMonad.Custom.Misc ( Applications (..) , customApplications ) where -data Applications = Applications { term :: String - , browser :: String - , top :: String - , mixer :: String - , notify :: String - } deriving (Show) +data Applications = Applications + { term :: !String + , browser :: !String + , top :: !String + , mixer :: !String + , notify :: !String + } deriving (Eq, 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" - } +customApplications = Applications + { term = "/usr/bin/urxvtc" + , browser = "/usr/bin/qutebrowser" + , top = "/usr/bin/htop" + , mixer = "/usr/bin/alsamixer" + , notify = "/usr/bin/notify-send" + } |