diff options
| author | François Pinard <pinard@iro.umontreal.ca> | 2012-01-11 16:52:12 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-01-11 16:52:12 +0100 |
| commit | f29e6edb90462767384b9c5ea81ca9a6e7a5890d (patch) | |
| tree | d1e8669736044401082faba7eb15d0646360edca | |
| parent | 7a73e155a3279a350fbf3ef7ad16cc458233458b (diff) | |
| download | org-mode-f29e6edb90462767384b9c5ea81ca9a6e7a5890d.tar.gz | |
org.el: Use `kill-visual-line' in `visual-line-mode'.
* org.el (org-kill-line): Use `kill-visual-line' in
`visual-line-mode'.
TINYCHANGE
| -rw-r--r-- | lisp/org.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org.el b/lisp/org.el index 78dfd4a..8993a7c 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -20491,7 +20491,8 @@ depending on context." (if (or (eq org-ctrl-k-protect-subtree 'error) (not (y-or-n-p "Kill hidden subtree along with headline? "))) (error "C-k aborted - would kill hidden subtree"))) - (call-interactively 'kill-line)) + (call-interactively + (if visual-line-mode 'kill-visual-line 'kill-line))) ((looking-at (org-re ".*?\\S-\\([ \t]+\\(:[[:alnum:]_@#%:]+:\\)\\)[ \t]*$")) (kill-region (point) (match-beginning 1)) (org-set-tags nil t)) |