summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDirk-Jan C. Binnema <djcb@djcbsoftware.nl>2021-07-17 11:09:50 +0300
committerGitHub <noreply@github.com>2021-07-17 11:09:50 +0300
commit375411ee775df7d4a35ed3d0822b3aa76633570a (patch)
tree7234722cfee1b4456a1fdfbee41321fbb1fb09e3
parent6657f252fc76f65e5598add255ea56ccab6cc5a9 (diff)
parent617e8023f67292d0d4f737b087a1dd66abc13171 (diff)
Merge pull request #2049 from thierryvolpiatto/fix_move_to_previous_line
Fix mu4e-headers-prev with invisible lines
-rw-r--r--mu4e/mu4e-headers.el9
1 files changed, 7 insertions, 2 deletions
diff --git a/mu4e/mu4e-headers.el b/mu4e/mu4e-headers.el
index 62d409a..7c76a85 100644
--- a/mu4e/mu4e-headers.el
+++ b/mu4e/mu4e-headers.el
@@ -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)))