From 3f6ce8c0861d65440040d63ec63745820dc4b737 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?R=C3=BCdiger=20Diedrich?= <hallo@rdiedri.ch>
Date: Sat, 9 Mar 2024 16:57:58 +0100
Subject: [PATCH] ligatures for victor mono

---
 .emacs | 46 ++++++++++++++++++++++++++++++----------------
 1 file changed, 30 insertions(+), 16 deletions(-)

diff --git a/.emacs b/.emacs
index f73a3f9..a3884e8 100644
--- a/.emacs
+++ b/.emacs
@@ -33,26 +33,38 @@
                       '("language_server.bat")
                     (eglot-alternatives
                      '("language_server.sh"
-		       "/home/marmalade/dev/stuff/3rdparty/lexical/_build/dev/package/lexical/bin/start_lexical.sh"))))))
+		       "/home/rdiedrich/dev/3rdparty/lexical/_build/dev/package/lexical/bin/start_lexical.sh"))))))
 
 (use-package elixir-ts-mode
   :ensure t
   :hook
   (elixir-ts-mode . eglot-ensure)
-  (elixir-ts-mode
-   .
-   (lambda ()
-     (push '(">=" . ?\u2265) prettify-symbols-alist)
-     (push '("<=" . ?\u2264) prettify-symbols-alist)
-     (push '("!=" . ?\u2260) prettify-symbols-alist)
-     (push '("==" . ?\u2A75) prettify-symbols-alist)
-     (push '("=~" . ?\u2245) prettify-symbols-alist)
-     (push '("<-" . ?\u2190) prettify-symbols-alist)
-     (push '("->" . ?\u2192) prettify-symbols-alist)
-     (push '("<-" . ?\u2190) prettify-symbols-alist)
-     (push '("|>" . ?\u25B7) prettify-symbols-alist)))
   (before-save . eglot-format))
 
+(use-package ligature :ensure t
+  :config
+  ;; Enable all Iosevka ligatures in programming modes
+  (ligature-set-ligatures
+   'prog-mode
+   ;; Iosevka
+   ;;'("<---" "<--"  "<<-" "<-" "->" "-->" "--->" "<->" "<-->" "<--->" "<---->" "<!--"
+   ;;  "<==" "<===" "<=" "=>" "=>>" "==>" "===>" ">=" "<=>" "<==>" "<===>" "<====>" "<!---"
+   ;;  "<~~" "<~" "~>" "~~>" "::" ":::" "==" "!=" "===" "!=="
+   ;;  ":=" ":-" ":+" "<*" "<*>" "*>" "<|" "<|>" "|>" "+:" "-:" "=:" "<******>" "++" "+++")
+   '(
+     "</" "</>" "/>" "~-" "-~" "~@" "<~" "<~>" "<~~" "~>" "~~" "~~>"
+     ">=" "<=" "<!--" "##" "###" "####" "|-" "-|" "|->" "<-|" ">-|"
+     "|-<" "|=" "|=>" ">-" "<-" "<--" "-->" "->" "-<" ">->" ">>-"
+     "<<-" "<->" "->>" "-<<" "<-<" "==>" "=>" "=/=" "!==" "!=" "<=="
+     ">>=" "=>>" ">=>" "<=>" "<=<" "=<=" "=>=" "<<=" "=<<" ".-" ".="
+     "=:=" "=!=" "==" "===" "::" ":=" ":>" ":<" ">:" "<:" ";;" "=~"
+     "!~" "::<" "<|" "<|>" "|>" "<>" "<$" "<$>" "$>" "<+" "<+>" "+>"
+     "?=" "/=" "/==" "/\\" "\\/" "__" "&&" "++" "+++"
+	))
+  ;; Enables ligature checks globally in all buffers. You can also do it
+  ;; per mode with `ligature-mode'.
+  (global-ligature-mode t))
+
 (use-package exec-path-from-shell
   :if (memq window-system '(mac ns x))
   :ensure t
@@ -194,13 +206,15 @@
  '(custom-enabled-themes '(leuven))
  '(inhibit-startup-screen t)
  '(initial-scratch-message nil)
+ '(menu-bar-mode nil)
  '(package-selected-packages
-   '(magit elixir-yasnippets consult-yasnippet rainbow-delimiters exec-path-from-shell elixir-mode elixir-ts-mode paredit par-edit org))
+   '(color-theme-sanityinc-tomorrow ligature magit elixir-yasnippets consult-yasnippet rainbow-delimiters exec-path-from-shell elixir-mode elixir-ts-mode paredit par-edit org))
  '(scroll-bar-mode nil)
- '(tool-bar-mode nil))
+ '(tool-bar-mode nil)
+ '(tooltip-mode nil))
 (custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
- '(default ((t (:family "Inconsolata" :foundry "PfEd" :slant normal :weight medium :height 158 :width normal)))))
+ '(default ((t (:family "Victor Mono" :foundry "UKWN" :slant normal :weight regular :height 181 :width normal)))))