Merge pull request #5101 from Zetagon/develop
Advice lispyville-end-of-defun to go past defuns
This commit is contained in:
commit
9be837402c
1 changed files with 11 additions and 1 deletions
|
@ -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))))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue