From f4853739e6df8f40924254f7fa6bc51f2a749a7d Mon Sep 17 00:00:00 2001 From: Jonathan Arnett Date: Sat, 25 Feb 2023 21:28:52 -0500 Subject: [PATCH] Add prettified symbols --- elixir-mode.el | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/elixir-mode.el b/elixir-mode.el index ec5fa05..5b8f6ad 100644 --- a/elixir-mode.el +++ b/elixir-mode.el @@ -444,6 +444,12 @@ is used to limit the scan." (,(elixir-rx (group code-point)) 1 font-lock-negation-char-face))) +(defvar elixir-prettify-symbols-alist + '(("<-" . ?←) ("->" . ?→) ("=>" . ?⇒) + ("!=" . ?≠) ("<=" . ?≤) (">=" . ?≥) + ("|>" . ?▷)) + "Alist of symbol prettifications for use with `prettify-symbols-mode'.") + ;;;###autoload (defun elixir-mode-open-github () "Elixir mode open GitHub page." @@ -587,7 +593,10 @@ just return nil." :backward-token 'elixir-smie-backward-token) ;; https://github.com/elixir-editors/emacs-elixir/issues/363 ;; http://debbugs.gnu.org/cgi/bugreport.cgi?bug=35496 - (setq-local smie-blink-matching-inners nil)) + (setq-local smie-blink-matching-inners nil) + + ;; Prettify symbols + (setq prettify-symbols-alist elixir-prettify-symbols-alist)) ;; Invoke elixir-mode when appropriate