Merge pull request #2049 from thierryvolpiatto/fix_move_to_previous_line

Fix mu4e-headers-prev with invisible lines
This commit is contained in:
Dirk-Jan C. Binnema 2021-07-17 11:09:50 +03:00 committed by GitHub
commit 375411ee77
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 7 additions and 2 deletions

View File

@ -1846,8 +1846,13 @@ docid. Otherwise, return nil."
(cl-flet ((goto-next-line
(arg)
(condition-case _err
(and (let (line-move-visual)
(line-move arg)) 0)
(prog1
(let (line-move-visual)
(and (line-move arg) 0))
;; Skip invisible text at BOL possibly hidden by
;; the end of another invisible overlay covering
;; previous EOL.
(move-to-column 2))
((beginning-of-buffer end-of-buffer)
1))))
(let* ((_succeeded (zerop (goto-next-line lines)))