瀏覽代碼

Cycling: Fix bug

The first cycle command on a line did not work correctly, to always
switched to FOLD.  This was due to an error in new, faster code to
find the next visible line.
Carsten Dominik 15 年之前
父節點
當前提交
a4a8bd2d07
共有 2 個文件被更改,包括 7 次插入1 次删除
  1. 5 0
      lisp/ChangeLog
  2. 2 1
      lisp/org.el

+ 5 - 0
lisp/ChangeLog

@@ -1,3 +1,8 @@
+2009-08-04  Carsten Dominik  <carsten.dominik@gmail.com>
+
+	* org.el (org-cycle-internal-local): Fix problem with finding next
+	invisible line.
+
 2009-08-03  Carsten Dominik  <carsten.dominik@gmail.com>
 
 	* org-list.el (org-list-send-list): Call

+ 2 - 1
lisp/org.el

@@ -4957,7 +4957,8 @@ in special contexts.
 	  (while (and (not (eobp)) ;; this is like `next-line'
 		      (get-char-property (1- (point)) 'invisible))
 	    (goto-char (next-single-char-property-change (point) 'invisible))
-	    (or (bolp) (beginning-of-line 2))))
+;;;???	    (or (bolp) (beginning-of-line 2))))
+	    (and (eolp) (beginning-of-line 2))))
 	(setq eol (point)))
       (outline-end-of-heading)   (setq eoh (point))
       (save-excursion