From 58f2110aa51acf83bbf9cc8296d665f32b2746c8 Mon Sep 17 00:00:00 2001
From: Tobias Ostner <tobias.ostner@gmail.com>
Date: Sat, 29 Jun 2024 11:56:25 +0200
Subject: [PATCH] Set ligatures more generally

---
 nix/config/emacs/init.el | 32 +++++++++++++++++++++++---------
 1 file changed, 23 insertions(+), 9 deletions(-)

diff --git a/nix/config/emacs/init.el b/nix/config/emacs/init.el
index 81b8f07..feef2df 100644
--- a/nix/config/emacs/init.el
+++ b/nix/config/emacs/init.el
@@ -347,15 +347,29 @@
 (use-package ligature
   :after fontaine
   :config
-  (defun to/set-ligatures-for-font-iosevka ()
-    (when (string= "Iosevka Comfy" (face-attribute 'default :family))
-      (ligature-set-ligatures
-       'prog-mode '("<---" "<--"  "<<-" "<-" "->" "-->" "--->" "<->" "<-->" "<--->" "<---->" "<!--"
-                    "<==" "<===" "<=" "=>" "=>>" "==>" "===>" ">=" "<=>" "<==>" "<===>" "<====>" "<!---"
-                    "<~~" "<~" "~>" "~~>" "::" ":::" "==" "!=" "===" "!=="
-                    ":=" ":-" ":+" "<*" "<*>" "*>" "<|" "<|>" "|>" "+:" "-:" "=:" "<******>" "++" "+++"))))
+  (defun to/set-ligatures-for-font (font-family)
+  (let ((ligatures
+         (cond ((string= font-family "Iosevka Comfy")
+                '("<---" "<--" "<<-" "<-" "->" "-->" "--->" "<->" "<-->" "<--->"
+                  "<---->" "<!--" "<==" "<===" "<=" "=>" "=>>" "==>" "===>" ">="
+                  "<=>" "<==>" "<===>" "<====>" "<!---" "<~~" "<~" "~>" "~~>" "::"
+                  ":::" "==" "!=" "===" "!==" ":=" ":-" ":+" "<*" "<*>" "*>" "<|"
+                  "<|>" "|>" "+:" "-:" "=:" "<******>" "++" "+++"))
+               ((string= font-family "Cascadia Code")
+                '("www" "--" "---" "-~" "(*" "{|" "}#" "[|" "]#" ".-" ".." "..." "..="
+                  "..<" ".?" ".=" "::" ":::" "::=" ":=" "://" ";;" "!." "!:" "!!" "!!."
+                  "!=" "!==" "?." "?:" "??" "??=" "?=" "*)" "**" "***" "*>" "*/" "#("
+                  "#{" "#[" "#:" "#!" "#?" "#=" "#_" "#_(" "/*" "/>" "//" "///" "/\\"
+                  "\\\\" "&&" "|}" "|]" "||" "|||" "|||>" "|>" "$>" "++" "+++" "+>" "=="
+                  "===" "=>>" "=<<" ">=" ">>" ">>=" ">>>" "<!--" "<*" "<*>" "<|" "<||"
+                  "<|||" "<|>" "<$" "<$>" "<+" "<+>" "<=" "<>" "<<" "<<=" "<<<" "<~"
+                  "<~>" "<~~" "</" "</>" "~-" "~@" "~=" "~>" "~~" "~~>" "^=" "%%"))
+               (t
+                '()))))
+    (when (string= font-family (face-attribute 'default :family))
+      (ligature-set-ligatures 'prog-mode ligatures))))
 
-  (to/set-ligatures-for-font-iosevka)
+  (to/set-ligatures-for-font (face-attribute 'default :family))
   (global-ligature-mode t))
 
 (use-package magit
@@ -363,7 +377,7 @@
 
 (use-package magit-todos
   :after magit
-  :config
+  :configp
   (magit-todos-mode 1))
 
 (use-package marginalia