From 6da7e9da5d6b986302ea65430da5ebc223b63c2c Mon Sep 17 00:00:00 2001
From: tslil <tslil@posteo.de>
Date: Thu, 2 Jul 2026 15:23:08 +0100
Subject: [emacs] fix unicode font ordering, no more glaring bitmaps

---
 emacs/inits/01-basic.el | 41 +++++++++++++++++++++++++++++------------
 1 file changed, 29 insertions(+), 12 deletions(-)

(limited to 'emacs/inits')

diff --git a/emacs/inits/01-basic.el b/emacs/inits/01-basic.el
index 343ac68..e5ee381 100644
--- a/emacs/inits/01-basic.el
+++ b/emacs/inits/01-basic.el
@@ -1,4 +1,4 @@
-;; Time-stamp: <2026-03-27 12h10 GMT (anker)>
+;; Time-stamp: <2026-07-02 15h23 BST (ca832e90)>
 
 ;; -----------------------------------------------------------------------------
 ;; Interface
@@ -50,12 +50,12 @@
 
   (require 'dbus)
   (pcase (caar (dbus-ignore-errors
-                 (dbus-call-method
-                  :session
-                  "org.freedesktop.portal.Desktop"
-                  "/org/freedesktop/portal/desktop"
-                  "org.freedesktop.portal.Settings" "Read"
-                  "org.freedesktop.appearance" "color-scheme")))
+                (dbus-call-method
+                 :session
+                 "org.freedesktop.portal.Desktop"
+                 "/org/freedesktop/portal/desktop"
+                 "org.freedesktop.portal.Settings" "Read"
+                 "org.freedesktop.appearance" "color-scheme")))
     (1 (my-switch-to-dark))
     (2 (my-switch-to-light)))
 
@@ -75,15 +75,32 @@
   ;; fonts
   (progn
     (setq my-font "Commit Mono-14")
-    (setq my-font "Berkeley Mono-14")
-    (setq my-font "Monaspace Krypton-14")
     (setq my-font "Sudo-14")
-    (setq my-font "Iosevka Term Slab-14")
     (setq my-font "PxPlus IBM VGA 9x16-14")
     (setq my-font "Myna-14")
-    (setq my-font "BQN386 Unicode DZ-12")
-    ;; (setq line-spacing 4)
+    (setq my-font "BQN386 Unicode DZ-16")
+    (setq my-font "Berkeley Mono-16")
+    (setq my-font "Iosevka Term Slab-18")
+    (setq my-font "Iosevka Etoile-18")
+    (setq my-font "Monaspace Krypton-14")
+    (setq my-font "Crimson Pro-20")
+    (setq my-font "Readerly-18")
+    (setq my-font "Libron-18")
     (set-frame-font my-font)
+
+    (set-fontset-font t 'unicode
+                      (font-spec :family "EB Garamond"))
+
+    (set-fontset-font t 'unicode
+                      (font-spec :family my-font)
+                      nil
+                      'prepend)
+
+    (set-fontset-font t 'mathematical
+                      (font-spec :family "Garamond-Math")
+                      nil
+                      'prepend)
+
     (set-face-attribute 'font-lock-comment-face nil :slant 'italic))
   )
 
-- 
cgit v1.2.3