Use the APL font in Dyalog buffers
This commit is contained in:
parent
2414165a65
commit
82553948d0
1 changed files with 11 additions and 1 deletions
12
init.el
12
init.el
|
@ -322,8 +322,18 @@
|
||||||
;; https://www.hexstreamsoft.com/libraries/clhs/
|
;; https://www.hexstreamsoft.com/libraries/clhs/
|
||||||
(load "/home/dimitri/quicklisp/clhs-use-local.el" t))
|
(load "/home/dimitri/quicklisp/clhs-use-local.el" t))
|
||||||
|
|
||||||
|
;; Use APL font face in current buffer
|
||||||
|
(defun my-buffer-face-mode-apl ()
|
||||||
|
"Use the APL font in current buffer."
|
||||||
|
(interactive)
|
||||||
|
(setq buffer-face-mode-face '(:family "APL385 Unicode" :height 150))
|
||||||
|
(buffer-face-mode))
|
||||||
|
|
||||||
(use-package dyalog-mode
|
(use-package dyalog-mode
|
||||||
:ensure t)
|
:ensure t
|
||||||
|
:hook (dyalog-mode . my-buffer-face-mode-apl)
|
||||||
|
:custom
|
||||||
|
(dyalog-fix-whitespace-before-save t))
|
||||||
|
|
||||||
(use-package gnu-apl-mode
|
(use-package gnu-apl-mode
|
||||||
:ensure t
|
:ensure t
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue