diff options
author | François Pinard <[email protected]> | 2012-01-11 16:52:12 +0100 |
---|---|---|
committer | Bastien Guerry <[email protected]> | 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)) |