1
0
Fork 0

Add some more ligatures supported by Fantasque Sans Mono

This commit is contained in:
Tom Willemse 2021-03-17 21:21:31 -07:00
parent 85759a07d8
commit 9cc3e356af

View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 2021.0316.232945 ;; Version: 2021.0317.212006
;; Package-Requires: (oni-ui oni-hydra yoshi-theme diminish mode-icons) ;; Package-Requires: (oni-ui oni-hydra yoshi-theme diminish mode-icons)
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
@ -78,7 +78,11 @@ If FRAME is nil, theyre set for the current frame."
(?- . ,(regexp-opt '("->" "-->" "->>" "-<" "-<<"))) (?- . ,(regexp-opt '("->" "-->" "->>" "-<" "-<<")))
(?> . ,(regexp-opt '(">->" ">=>" ">>=" ">>-" ">-" ">=" ">>" ">>>"))) (?> . ,(regexp-opt '(">->" ">=>" ">>=" ">>-" ">-" ">=" ">>" ">>>")))
(?~ . ,(regexp-opt '("~~" "~>" "~~>"))) (?~ . ,(regexp-opt '("~~" "~>" "~~>")))
(?| . ,(regexp-opt '("|>" "||>" "|||>")))))) (?| . ,(regexp-opt '("|>" "||>" "|||>" "||")))
(?: . ,(regexp-opt '("::")))
(?& . ,(regexp-opt '("&&")))
(?/ . ,(regexp-opt '("//" "/*")))
(?* . ,(regexp-opt '("*/" "**/"))))))
(dolist (char-regexp ligatures) (dolist (char-regexp ligatures)
(set-char-table-range composition-function-table (car char-regexp) (set-char-table-range composition-function-table (car char-regexp)
`([,(cdr char-regexp) 0 font-shape-gstring]))))) `([,(cdr char-regexp) 0 font-shape-gstring])))))