Update lisp-mode font-face settings

This commit is contained in:
Marcus Kammer 2024-11-30 15:43:08 +01:00
parent 2c7a78cd2b
commit 8811cf0640

15
init.el
View file

@ -924,9 +924,9 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
(use-package elisp-mode
:ensure nil
:hook ((emacs-lisp-mode . prettify-symbols-mode)
(emacs-lisp-mode . (lambda ()
(face-remap-add-relative 'font-lock-function-name-face nil :underline t)
(face-remap-add-relative 'font-lock-keyword-face nil :slant 'italic))))
(emacs-lisp-mode . (lambda () (face-remap-add-relative 'font-lock-function-name-face
nil
:underline t))))
:mode (("\\.el$" . emacs-lisp-mode))
:config
(setq-local lisp-indent-function 'lisp-indent-function)
@ -934,21 +934,20 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
(use-package lisp-mode
:ensure nil
:hook ((lisp-mode . (lambda ()
(face-remap-add-relative 'font-lock-function-name-face nil :underline t)
(face-remap-add-relative 'font-lock-keyword-face nil :slant 'italic))))
:hook ((lisp-mode . (lambda () (face-remap-add-relative 'font-lock-function-name-face
nil
:underline t))))
:mode (("\\.lisp$" . lisp-mode)
("\\.lsp$" . lisp-mode)
("\\.cl$" . lisp-mode)
("\\.asd$" . lisp-mode))
:init
(setq inferior-lisp-program "sbcl --noinform")
:config
(setq-local comment-start ";; ")
(setq-local comment-start ";; ")
(setq-local lisp-indent-function 'common-lisp-indent-function)
(setq-local fill-column 84)
(setq-local comment-column 84)
(defvar g-cl-function-names
'("*" "+" "-" "/" "/=" "1+" "1-" "<" "<=" "=" ">"
">=" "abort" "abs" "acons" "acos" "acosh" "add-method" "adjoin"