From 2d76d76314c49344a5b92e27076889c9e0531406 Mon Sep 17 00:00:00 2001
From: Justin Bedo <cu@cua0.org>
Date: Tue, 16 Dec 2025 09:23:28 +1100
Subject: pragmatapro

---
 jterm.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'jterm.hs')

diff --git a/jterm.hs b/jterm.hs
index a116c9b..f5721d4 100644
--- a/jterm.hs
+++ b/jterm.hs
@@ -525,7 +525,7 @@ main = do
         screen = defaultScreenOfDisplay display
         visual = defaultVisualOfScreen screen
         colourmap = defaultColormap display screenno
-    font <- xftFontOpen display screen "Dina:size=10"
+    font <- xftFontOpen display screen "PragmataPro:size=14"
     rootw <- rootWindow display screenno
     win <- createSimpleWindow display rootw 0 0 100 100 1 border background
     mapWindow display win
-- 
cgit v1.2.3