summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--app/Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 93db14c..701646f 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -152,9 +152,10 @@ createWindow args = do
swidth = fi (X.displayWidth dpy scrn)
sheight = fi (X.displayHeight dpy scrn)
wwidth = swidth - 16
- wheight = 32
wleft = 8
wtop = 8
+ fnt <- X.xftFontOpen dpy scr "IosevkaTerm Nerd Font:size=14"
+ wheight <- X.xftfont_height fnt
cmap <- X.createColormap dpy root vis X.allocNone
win <- X.allocaSetWindowAttributes $ \attr -> do
X.set_colormap attr cmap
@@ -184,7 +185,6 @@ createWindow args = do
pixm <- X.createPixmap dpy win (fi wwidth) (fi wheight) dpth
gc <- X.createGC dpy win
drw <- X.xftDrawCreate dpy pixm vis cmap
- fnt <- X.xftFontOpen dpy scr "IosevkaTerm Nerd Font:size=14"
X.mapWindow dpy win
let dirty = True
ui <-