marcuskammer/cloudinit
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update emacs config

Browse source
This commit is contained in:
Marcus Kammer 2023-12-26 18:15:02 +01:00
parent 8d78569bdf
commit 71d9b529c8
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
sbcl-nginx.yml
View file

@ -766,17 +766,19 @@ write_files:
;; shell$ sbcl ;; shell$ sbcl
;; * (mapc 'require '(sb-bsd-sockets sb-posix sb-introspect sb-cltl2 asdf)) ;; * (mapc 'require '(sb-bsd-sockets sb-posix sb-introspect sb-cltl2 asdf))
;; * (save-lisp-and-die "sbcl.core-for-slime") ;; * (save-lisp-and-die "sbcl.core-for-slime")
(when (eq system-type 'gnu/linux)
(let ((image-path (expand-file-name "~/sbcl.core-for-slime"))) (let ((image-path (expand-file-name "~/sbcl.core-for-slime")))
(when (file-exists-p image-path)
(setq slime-lisp-implementations (setq slime-lisp-implementations
`((sbcl ("sbcl" "--core" ,image-path)))))) `((sbcl ("sbcl" "--noinform" "--core" ,image-path) :coding-system utf-8-unix))))))
(use-package lisp-mode (use-package lisp-mode
:ensure nil :ensure nil
:hook ((lisp-mode . prettify-symbols-mode) :hook ((lisp-mode . prettify-symbols-mode)
(lisp-mode . (lambda () (lisp-mode . (lambda ()
(set-face-attribute 'font-lock-function-name-face nil :underline t) (set-face-attribute 'font-lock-function-name-face nil :underline t)
(set-face-attribute 'font-lock-keyword-face nil :slant 'italic) (face-remap-add-relative 'font-lock-function-name-face nil :underline t)
(setq-local lisp-indent-function 'common-lisp-indent-function)))) (face-remap-add-relative 'font-lock-keyword-face nil :slant 'italic))))
:mode (("\\.lisp$" . lisp-mode) :mode (("\\.lisp$" . lisp-mode)
("\\.lsp$" . lisp-mode) ("\\.lsp$" . lisp-mode)
("\\.cl$" . lisp-mode)) ("\\.cl$" . lisp-mode))