diff options
| author | Stefan Kangas | 2019-07-06 16:35:52 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-07-06 16:35:52 +0200 |
| commit | 01aac6c1fcf8cf8d3f2463e8182f986abf768e29 (patch) | |
| tree | 918d97adc294fc169c98ecf0f729a9fd776b02b1 | |
| parent | d7ee13331c1a4d47939132b896608a22125b9a26 (diff) | |
| download | emacs-01aac6c1fcf8cf8d3f2463e8182f986abf768e29.tar.gz emacs-01aac6c1fcf8cf8d3f2463e8182f986abf768e29.zip | |
Improve an error message in bookmark.el
* lisp/bookmark.el (bookmark-alist-from-buffer): Improve error
message (bug#36391).
| -rw-r--r-- | lisp/bookmark.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 4f908313ccf..2640b2157ab 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -650,7 +650,9 @@ affect point." | |||
| 650 | (forward-char -1) | 650 | (forward-char -1) |
| 651 | (read (current-buffer))) | 651 | (read (current-buffer))) |
| 652 | ;; Else no hope of getting information here. | 652 | ;; Else no hope of getting information here. |
| 653 | (error "Not bookmark format"))))) | 653 | (if buffer-file-name |
| 654 | (error "File not in bookmark format: %s" buffer-file-name) | ||
| 655 | (error "Buffer not in bookmark format: %s" (buffer-name))))))) | ||
| 654 | 656 | ||
| 655 | 657 | ||
| 656 | (defun bookmark-upgrade-version-0-alist (old-list) | 658 | (defun bookmark-upgrade-version-0-alist (old-list) |