Merge pull request #5101 from Zetagon/develop

Advice lispyville-end-of-defun to go past defuns
This commit is contained in:
Henrik Lissner 2021-05-26 16:30:54 -04:00 committed by GitHub
commit 9be837402c
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -38,4 +38,14 @@
additional additional
additional-insert)) additional-insert))
:config :config
(lispyville-set-key-theme)) (lispyville-set-key-theme)
;; REVIEW Delete this once https://github.com/noctuid/lispyville/pull/297 is merged
(defadvice! +lispy--fix-lispyville-end-of-defun-a (_)
"lispyville-end-of-defun doesn't go to the next defun when
point is already at the end of a defun, whereas
lispyville-beginning-of-defun does."
:before #'lispyville-end-of-defun
(when (<= (- (line-end-position)
(point))
1)
(forward-line))))