Advise cycle-spacing
This commit is contained in:
parent
0858e45bac
commit
bf1f5d1adf
6
init.el
6
init.el
|
@ -1006,7 +1006,11 @@ specific to most general, they are these:
|
||||||
tab-width 4
|
tab-width 4
|
||||||
backward-delete-char-untabify-method 'hungry)
|
backward-delete-char-untabify-method 'hungry)
|
||||||
|
|
||||||
(:global "M-SPC" #'cycle-spacing))
|
(:global "M-SPC" #'cycle-spacing)
|
||||||
|
;; http://ruzkuku.com/emacs.d.html#orgc62eb58
|
||||||
|
(:advise cycle-spacing :around
|
||||||
|
(defun cycle-spacing@newlines-by-default (old arg &rest _)
|
||||||
|
(funcall old (if (numberp arg) (- arg) arg)))))
|
||||||
|
|
||||||
(setup windmove
|
(setup windmove
|
||||||
(:option windmove-wrap-around t)
|
(:option windmove-wrap-around t)
|
||||||
|
|
Loading…
Reference in New Issue