From 069ebce286c599f4ff67d83e25b6d5054c9559bc Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Fri, 27 Nov 2009 14:37:00 +0100 Subject: [PATCH] Fix motion bug in org-forward-same-level --- lisp/ChangeLog | 3 +++ lisp/org.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 948a4e7ef..9e22dce53 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-11-27 Carsten Dominik + * org.el (org-forward-same-level): Stop at headings that start + with an invisible character. + * org-clock.el (org-clock-in): Do not restart the clock in the same entry where it is running now. diff --git a/lisp/org.el b/lisp/org.el index 090cdfb1b..d9040158b 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -17576,7 +17576,7 @@ Stop at the first and last subheadings of a superior heading." (setq l (- (match-end 0) (match-beginning 0) 1)) (= l level) (not invisible-ok) - (org-invisible-p)) + (progn (backward-char 1) (org-invisible-p))) (if (< l level) (setq arg 1))) (setq arg (1- arg))) (beginning-of-line 1)))