jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Wrap kill-region with defadvice from crux (#1035)

Browse source
This commit is contained in:
Rahiel Kasim 2016-09-25 06:58:06 +02:00 committed by Bozhidar Batsov
parent e8a0f5e833
commit 7551ed6e33
1 changed files with 1 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
core/prelude-editor.el
View file

@ -197,12 +197,7 @@ The body of the advice is in BODY."
;; note - this should be after volatile-highlights is required
;; add the ability to cut the current line, without marking it
(require 'rect)
(defadvice kill-region (before smart-cut activate compile)
"When called interactively with no active region, kill a single line instead."
(interactive
(if mark-active (list (region-beginning) (region-end) rectangle-mark-mode)
(list (line-beginning-position)
(line-beginning-position 2)))))
(crux-with-region-or-line kill-region)
;; tramp, for sudo access
(require 'tramp)