Update some elisp stuff
This commit is contained in:
@@ -300,13 +300,6 @@ Apply OLDFUN with to ARGS."
|
|||||||
eos)
|
eos)
|
||||||
. conf-mode))
|
. conf-mode))
|
||||||
(add-to-list 'auto-mode-alist `(,(rx (or bos "/") "README" eos) . markdown-mode))
|
(add-to-list 'auto-mode-alist `(,(rx (or bos "/") "README" eos) . markdown-mode))
|
||||||
(keymap-set emacs-lisp-mode-map "C-c C-r" #'eval-region)
|
|
||||||
(defun my/-fix-emacs-lisp-mode-system-files ()
|
|
||||||
"Fix tabs in system Lisp files."
|
|
||||||
(when (string-prefix-p lisp-directory buffer-file-name)
|
|
||||||
;; system Emacs files use tab characters and look weird without this.
|
|
||||||
(setq-local tab-width 8)))
|
|
||||||
(add-hook 'emacs-lisp-mode-hook #'my/-fix-emacs-lisp-mode-system-files)
|
|
||||||
|
|
||||||
;; Minibuffer stuff
|
;; Minibuffer stuff
|
||||||
(add-hook 'minibuffer-setup-hook #'cursor-intangible-mode)
|
(add-hook 'minibuffer-setup-hook #'cursor-intangible-mode)
|
||||||
@@ -2371,6 +2364,16 @@ line in the block and manually deal with indentation."
|
|||||||
(advice-add 'calculate-lisp-indent :around
|
(advice-add 'calculate-lisp-indent :around
|
||||||
#'my/-calculate-lisp-indent-noindent-comment)
|
#'my/-calculate-lisp-indent-noindent-comment)
|
||||||
|
|
||||||
|
;; Elisp
|
||||||
|
(keymap-set emacs-lisp-mode-map "C-c C-r" #'eval-region)
|
||||||
|
(defun my/-fix-emacs-lisp-mode-system-files ()
|
||||||
|
"Fix tabs in system Lisp files."
|
||||||
|
(when (string-prefix-p lisp-directory buffer-file-name)
|
||||||
|
;; system Emacs files use tab characters and look weird without this.
|
||||||
|
(setq-local tab-width 8)))
|
||||||
|
(add-hook 'emacs-lisp-mode-hook #'my/-fix-emacs-lisp-mode-system-files)
|
||||||
|
(setopt elisp-fontify-semantically t)
|
||||||
|
|
||||||
;; common lisp
|
;; common lisp
|
||||||
(use-package lisp-mode
|
(use-package lisp-mode
|
||||||
:ensure nil
|
:ensure nil
|
||||||
|
|||||||
Reference in New Issue
Block a user