diff options
| author | Noam Postavsky | 2018-07-23 21:49:00 -0400 |
|---|---|---|
| committer | Noam Postavsky | 2018-07-23 22:07:14 -0400 |
| commit | f64c2774e96c755a5fddcbc49db65dcc3fcb9323 (patch) | |
| tree | 5cf35a1863d127564412619e8a694215d8a3e3f3 | |
| parent | 1208aaa9893700292693a6b85ae7d1abdb0460ef (diff) | |
| download | emacs-f64c2774e96c755a5fddcbc49db65dcc3fcb9323.tar.gz emacs-f64c2774e96c755a5fddcbc49db65dcc3fcb9323.zip | |
Let bookmark-jump override window-point (Bug#31751)
* lisp/bookmark.el (bookmark-jump): Use pop-to-buffer-same-window
instead of switch-to-buffer, the latter obeys
switch-to-buffer-preserve-window-point and so loses the bookmark's
point.
| -rw-r--r-- | lisp/bookmark.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 1a2ec1eb667..9299ab8850f 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -1102,7 +1102,7 @@ BOOKMARK is usually a bookmark name (a string). It can also be a | |||
| 1102 | bookmark record, but this is usually only done by programmatic callers. | 1102 | bookmark record, but this is usually only done by programmatic callers. |
| 1103 | 1103 | ||
| 1104 | If DISPLAY-FUNC is non-nil, it is a function to invoke to display the | 1104 | If DISPLAY-FUNC is non-nil, it is a function to invoke to display the |
| 1105 | bookmark. It defaults to `switch-to-buffer'. A typical value for | 1105 | bookmark. It defaults to `pop-to-buffer-same-window'. A typical value for |
| 1106 | DISPLAY-FUNC would be `switch-to-buffer-other-window'." | 1106 | DISPLAY-FUNC would be `switch-to-buffer-other-window'." |
| 1107 | (interactive | 1107 | (interactive |
| 1108 | (list (bookmark-completing-read "Jump to bookmark" | 1108 | (list (bookmark-completing-read "Jump to bookmark" |
| @@ -1110,7 +1110,7 @@ DISPLAY-FUNC would be `switch-to-buffer-other-window'." | |||
| 1110 | (unless bookmark | 1110 | (unless bookmark |
| 1111 | (error "No bookmark specified")) | 1111 | (error "No bookmark specified")) |
| 1112 | (bookmark-maybe-historicize-string bookmark) | 1112 | (bookmark-maybe-historicize-string bookmark) |
| 1113 | (bookmark--jump-via bookmark (or display-func 'switch-to-buffer))) | 1113 | (bookmark--jump-via bookmark (or display-func 'pop-to-buffer-same-window))) |
| 1114 | 1114 | ||
| 1115 | 1115 | ||
| 1116 | ;;;###autoload | 1116 | ;;;###autoload |