Consider the following situation:

* A
  Some text.
* B

- Place the cursor on A, press C-x n w (org-narrow-to-subtree).
- Go to the very end of the buffer and insert "xyz".
- C-x n w (widen).

You end up with:

* A
  Some Text
xyz* B


The attached one-line patch fixes this by passing `nil' for the
`to-heading' parameter of `org-end-of-subtree'.
>From 688a42315caf5840c9db5ab957670c33d1921e92 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jan=20B=C3=B6cker?= <jan.boec...@jboecker.de>
Date: Mon, 18 Jan 2010 11:54:00 +0100
Subject: [PATCH] org-narrow-to-subtree: prevent prepending text to the next 
headline while narrowed

---
 lisp/ChangeLog |    6 ++++++
 lisp/org.el    |    2 +-
 2 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b85a716..cb6ebe9 100755
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2010-01-18  Jan Böcker  <jan.boec...@jboecker.de>
+
+       * org.el (org-narrow-to-subtree): Position the end of the narrowed
+       region before the line with the next heading, to prevent the user
+       from prepending text to the next headline.
+
 2010-01-18  Carsten Dominik  <carsten.domi...@gmail.com>
 
        * org-ctags.el (org-ctags-enable): Change order of functions.
diff --git a/lisp/org.el b/lisp/org.el
index 626720f..a4755a2 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -6829,7 +6829,7 @@ If yes, remember the marker and the distance to BEG."
     (save-match-data
       (narrow-to-region
        (progn (org-back-to-heading t) (point))
-       (progn (org-end-of-subtree t t) (point))))))
+       (progn (org-end-of-subtree t nil) (point))))))
 
 (defun org-clone-subtree-with-time-shift (n &optional shift)
   "Clone the task (subtree) at point N times.
-- 
1.6.6

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to