diff options
| author | Campbell Barton | 2021-12-30 17:20:45 +1100 |
|---|---|---|
| committer | Eli Zaretskii | 2021-12-30 09:03:40 +0200 |
| commit | 1e3076e2dbddaeb8cf678a9bfb30b7d269de1479 (patch) | |
| tree | 891f08c2a80a51103c2ffe9902f787e1112a8230 | |
| parent | 06545bc0cc533b1abd831dd521df5f3369675d61 (diff) | |
| download | emacs-1e3076e2dbddaeb8cf678a9bfb30b7d269de1479.tar.gz emacs-1e3076e2dbddaeb8cf678a9bfb30b7d269de1479.zip | |
Fix bug where bookmark-jump used (point), not (point-at-bol)
This matches changes from e852822f3db469c985bf022651f184d6ff2c518a,
regression in 7fe88446c30279285e3171091189b3d1af697c05.
* lisp/bookmark.el (bookmark--jump-via): Look at overlays at BOL.
Otherwise the fringe bookmark indication is not deleted with the
bookmark.
Copyright-paperwork-exempt: yes
| -rw-r--r-- | lisp/bookmark.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 623f0acd28a..c5e7f2720d1 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -1164,7 +1164,7 @@ and then show any annotations for this bookmark." | |||
| 1164 | ;; FIXME: we used to only run bookmark-after-jump-hook in | 1164 | ;; FIXME: we used to only run bookmark-after-jump-hook in |
| 1165 | ;; `bookmark-jump' itself, but in none of the other commands. | 1165 | ;; `bookmark-jump' itself, but in none of the other commands. |
| 1166 | (when bookmark-set-fringe-mark | 1166 | (when bookmark-set-fringe-mark |
| 1167 | (let ((overlays (overlays-in (point) (point))) | 1167 | (let ((overlays (overlays-in (point-at-bol) (1+ (point-at-bol)))) |
| 1168 | temp found) | 1168 | temp found) |
| 1169 | (while (and (not found) (setq temp (pop overlays))) | 1169 | (while (and (not found) (setq temp (pop overlays))) |
| 1170 | (when (eq 'bookmark (overlay-get temp 'category)) | 1170 | (when (eq 'bookmark (overlay-get temp 'category)) |