lang/common-lisp: offload to evil-collection-sly

This commit is contained in:
Henrik Lissner 2019-10-12 00:41:46 -04:00
parent 30c091d3f5
commit b45cc335db
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 2 additions and 118 deletions

View file

@ -3,13 +3,3 @@
;; HACK Fix #1772: void-variable sly-contribs errors due to sly packages (like
;; `sly-macrostep') trying to add to `sly-contribs' before it is defined.
;;;###autoload (defvar sly-contribs '(sly-fancy))
;;;###autoload
(defun +common-lisp--sly-last-sexp-a (command &rest args)
"In normal-state or motion-state, last sexp ends at point."
(if (and (not evil-move-beyond-eol)
(or (evil-normal-state-p) (evil-motion-state-p)))
(save-excursion
(unless (or (eobp) (eolp)) (forward-char))
(apply command args))
(apply command args)))