emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] Only use `visual-line-mode if it's bound`[WAS: Current patches for X


From: Michael Sperber
Subject: [O] Only use `visual-line-mode if it's bound`[WAS: Current patches for XEmacs]
Date: Sat, 07 Apr 2012 21:00:35 +0200
User-agent: Gnus/5.110011 (No Gnus v0.11) XEmacs/21.5-b31 (darwin)

Bastien <address@hidden> writes:

> Can you send each patch in a separate email using 
> `git format-patch'?

Attached.  The second one will follow shortly.

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
>From 18a83ce61fb420e85987e77f8506c01023a22c16 Mon Sep 17 00:00:00 2001
From: Mike Sperber <address@hidden>
Date: Wed, 4 Apr 2012 09:48:05 +0200
Subject: [PATCH] Only use `visual-line-mode' if it's bound.

        * org.el (org-kill-line): Access `visual-line-mode' only if it's
        bound.
---
 lisp/org.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index b83700f..8d9d793 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -20793,7 +20793,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:address@hidden:]+:\\)\\)[ \t]*$"))
     (kill-region (point) (match-beginning 1))
     (org-set-tags nil t))
-- 
1.7.0.5


reply via email to

[Prev in Thread] Current Thread [Next in Thread]