Selaa lähdekoodia

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 vuotta sitten
vanhempi
commit
a4a8bd2d07
2 muutettua tiedostoa jossa 7 lisäystä ja 1 poistoa
  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