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)))