diff options
| author | tv <tv@krebsco.de> | 2022-04-04 15:19:19 +0200 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2022-12-05 17:43:12 +0100 |
| commit | f9d4a12916fbe6b46548b6526fd3ab697999a671 (patch) | |
| tree | fe7e165d2500767e9d308ee579860500510d422d /tv/5pkgs/haskell/xmonad-tv/src/main.hs | |
| parent | 7721142f255cd00d4dace91b0b26725e7b70e696 (diff) | |
tv xmonad: move my* to Build
This prevents Main from getting rebuilt due to TH whenever one of its
imported modules changes.
Diffstat (limited to 'tv/5pkgs/haskell/xmonad-tv/src/main.hs')
| -rw-r--r-- | tv/5pkgs/haskell/xmonad-tv/src/main.hs | 17 |
1 files changed, 1 insertions, 16 deletions
diff --git a/tv/5pkgs/haskell/xmonad-tv/src/main.hs b/tv/5pkgs/haskell/xmonad-tv/src/main.hs index 81373f410..b82f398e4 100644 --- a/tv/5pkgs/haskell/xmonad-tv/src/main.hs +++ b/tv/5pkgs/haskell/xmonad-tv/src/main.hs @@ -1,6 +1,4 @@ {-# LANGUAGE LambdaCase #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE TypeApplications #-} module Main (main) where @@ -35,22 +33,9 @@ import XMonad.Actions.PerWorkspaceKeys (chooseAction) import XMonad.Stockholm.Pager import XMonad.Stockholm.Shutdown -import THEnv.JSON (getCompileEnvJSONExp) -myFont :: String -myFont = "-schumacher-*-*-*-*-*-*-*-*-*-*-*-iso10646-*" - -myScreenWidth :: Dimension -myScreenWidth = - $(getCompileEnvJSONExp (id @Dimension) "XMONAD_BUILD_SCREEN_WIDTH") - -myTermFontWidth :: Dimension -myTermFontWidth = - $(getCompileEnvJSONExp (id @Dimension) "XMONAD_BUILD_TERM_FONT_WIDTH") - -myTermPadding :: Dimension -myTermPadding = 2 +import Build (myFont, myScreenWidth, myTermFontWidth, myTermPadding) main :: IO () |