From: Michael Sperber <sperber@deinprogramm.de>
To: emacs-orgmode@gnu.org
Subject: Only use `visual-line-mode if it's bound`[WAS: Current patches for XEmacs]
Date: Sat, 07 Apr 2012 21:00:35 +0200 [thread overview]
Message-ID: <y9lty0vfju4.fsf_-_@deinprogramm.de> (raw)
In-Reply-To: 87sjgigcu9.fsf@gnu.org
[-- Attachment #1: Type: text/plain, Size: 226 bytes --]
Bastien <bzg@gnu.org> 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
[-- Attachment #2: Type: text/plain, Size: 985 bytes --]
From 18a83ce61fb420e85987e77f8506c01023a22c16 Mon Sep 17 00:00:00 2001
From: Mike Sperber <sperber@deinprogramm.de>
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:]_@#%:]+:\\)\\)[ \t]*$"))
(kill-region (point) (match-beginning 1))
(org-set-tags nil t))
--
1.7.0.5
next prev parent reply other threads:[~2012-04-07 19:00 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-04-05 19:33 Current patches for XEmacs Michael Sperber
2012-04-05 20:09 ` Bastien
2012-04-07 19:00 ` Michael Sperber [this message]
2012-04-07 19:03 ` Fix bug in `org-footnote-normalize' [WAS: Current patches for XEmacs] Michael Sperber
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=y9lty0vfju4.fsf_-_@deinprogramm.de \
--to=sperber@deinprogramm.de \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.