Merge pull request #311 from jake-87/patch-1

Stop tuareg from overwriting prettify-symbols-alist
ocaml · Oct 5, 2023 · b09ab31 · b09ab31
2 parents ce92fb4 + 5f964d3
commit b09ab31
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/tuareg.el b/tuareg.el
@@ -3198,10 +3198,12 @@ file outside _build? "))
     (add-function :around (local 'show-paren-data-function)
                   #'tuareg--show-paren))
   (setq prettify-symbols-alist
-        (if tuareg-prettify-symbols-full
-            (append tuareg-prettify-symbols-basic-alist
-                    tuareg-prettify-symbols-extra-alist)
-          tuareg-prettify-symbols-basic-alist))
+	;; preserve previous alist
+        (append prettify-symbols-alist
+		(if tuareg-prettify-symbols-full
+		    (append tuareg-prettify-symbols-basic-alist
+			    tuareg-prettify-symbols-extra-alist)
+		  tuareg-prettify-symbols-basic-alist)))
   (when (boundp 'prettify-symbols-compose-predicate) ; Emacs 25 or later
     (setq prettify-symbols-compose-predicate
           #'tuareg--prettify-symbols-compose-p))