31 lines
909 B
EmacsLisp
31 lines
909 B
EmacsLisp
|
(defun spacemacs/ensime-refactor-accept ()
|
||
|
|
(interactive)
|
||
|
|
(funcall continue-refactor)
|
||
|
|
(ensime-popup-buffer-quit-function))
|
||
|
|
|
||
|
|
(defun spacemacs/ensime-refactor-cancel ()
|
||
|
|
(interactive)
|
||
|
|
(funcall cancel-refactor)
|
||
|
|
(ensime-popup-buffer-quit-function))
|
||
|
|
|
||
|
|
(defun spacemacs/scala-join-line ()
|
||
|
|
"Adapt `scala-indent:join-line' to behave more like evil's line join.
|
||
|
|
|
||
|
|
`scala-indent:join-line' acts like the vanilla `join-line',
|
||
|
|
joining the current line with the previous one. The vimmy way is
|
||
|
|
to join the current line with the next.
|
||
|
|
|
||
|
|
Try to move to the subsequent line and then join. Then manually move
|
||
|
|
point to the position of the join."
|
||
|
|
(interactive)
|
||
|
|
(let (join-pos)
|
||
|
|
(save-excursion
|
||
|
|
(goto-char (line-end-position))
|
||
|
|
(unless (eobp)
|
||
|
|
(forward-line)
|
||
|
|
(call-interactively 'scala-indent:join-line)
|
||
|
|
(setq join-pos (point))))
|
||
|
|
|
||
|
|
(when join-pos
|
||
|
|
(goto-char join-pos))))
|