summaryrefslogtreecommitdiffhomepage
path: root/src/lib
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2018-12-05 00:03:34 +0000
committerjao <jao@gnu.org>2018-12-05 00:03:34 +0000
commit5d68d556eaa107fc01a67c661f600812a4a64e40 (patch)
tree04844b8ee864acd377cbbde5fbb90e9fc082e72a /src/lib
parent1cc4f0c1924e20fad7018307c549cee445afbaf7 (diff)
downloadxmobar-config-5d68d556eaa107fc01a67c661f600812a4a64e40.tar.gz
xmobar-config-5d68d556eaa107fc01a67c661f600812a4a64e40.tar.bz2
Minor tweaks
Diffstat (limited to 'src/lib')
-rw-r--r--src/lib/Bottom.hs2
-rw-r--r--src/lib/Config.hs5
2 files changed, 5 insertions, 2 deletions
diff --git a/src/lib/Bottom.hs b/src/lib/Bottom.hs
index 1c70548..4bd6614 100644
--- a/src/lib/Bottom.hs
+++ b/src/lib/Bottom.hs
@@ -65,7 +65,7 @@ brightness = Brightness ["--", "-D", "intel_backlight"] 10
memory = Memory ["-t","<available> M", "-p", "2"] 20
config cs p = (baseConfig p) {
- position = BottomSize C 100 24
+ position = BottomSize C 100 defaultHeight
, textOffset = 17
, commands = [ Run (uptime p)
, Run brightness
diff --git a/src/lib/Config.hs b/src/lib/Config.hs
index 94b9211..4ab805d 100644
--- a/src/lib/Config.hs
+++ b/src/lib/Config.hs
@@ -1,9 +1,12 @@
-module Config (Palette, baseConfig, palette, (<~>)) where
+module Config (Palette, baseConfig, palette, (<~>), defaultHeight) where
import System.Environment (lookupEnv)
import Xmobar
+defaultHeight :: Int
+defaultHeight = 24
+
data Palette = Palette { pNormal :: String
, pLow :: String
, pHigh :: String