Only use `visual-line-mode' if it's bound.

* org.el (org-kill-line): Access `visual-line-mode' only if it's
bound.

TINYCHANGE
This commit is contained in:
Mike Sperber 2012-04-04 09:48:05 +02:00 committed by Bastien Guerry
parent 00f59ff30b
commit 872a6f75c9
1 changed files with 1 additions and 1 deletions

View File

@ -20801,7 +20801,7 @@ depending on context."
(not (y-or-n-p "Kill hidden subtree along with headline? ")))
(error "C-k aborted - would kill hidden subtree")))
(call-interactively
(if visual-line-mode 'kill-visual-line 'kill-line)))
(if (and (boundp 'visual-line-mode) 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))