ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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.
This commit is contained in:
Carsten Dominik 2009-08-04 08:27:41 +02:00
parent cd70915e26
commit a4a8bd2d07
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -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> 2009-08-03 Carsten Dominik <carsten.dominik@gmail.com>
* org-list.el (org-list-send-list): Call * org-list.el (org-list-send-list): Call

3
lisp/org.el
View File

@ -4957,7 +4957,8 @@ in special contexts.
(while (and (not (eobp)) ;; this is like `next-line' (while (and (not (eobp)) ;; this is like `next-line'
(get-char-property (1- (point)) 'invisible)) (get-char-property (1- (point)) 'invisible))
(goto-char (next-single-char-property-change (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))) (setq eol (point)))
(outline-end-of-heading) (setq eoh (point)) (outline-end-of-heading) (setq eoh (point))
(save-excursion (save-excursion