Mercurial > emacs
comparison lisp/woman.el @ 107855:d9895f87d758
Add a new field `location' to bookmarks for non-file bookmarks.
* bookmark.el (bookmark-location): Use the new field, if present.
(bookmark-insert-location): Undo last change, not needed any more.
* man.el (Man-bookmark-make-record):
* woman.el (woman-bookmark-make-record):
* gnus-sum.el (gnus-summary-bookmark-make-record): Add `location' field.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 14 Apr 2010 11:07:53 -0400 |
| parents | f50f5478ec53 |
| children | d835100c3e8b |
comparison
equal
deleted
inserted
replaced
| 107854:6ebc01c309bf | 107855:d9895f87d758 |
|---|---|
| 4531 | 4531 |
| 4532 (defun woman-bookmark-make-record () | 4532 (defun woman-bookmark-make-record () |
| 4533 "Make a bookmark entry for a Woman buffer." | 4533 "Make a bookmark entry for a Woman buffer." |
| 4534 `(,(Man-default-bookmark-title) | 4534 `(,(Man-default-bookmark-title) |
| 4535 ,@(bookmark-make-record-default 'point-only) | 4535 ,@(bookmark-make-record-default 'point-only) |
| 4536 (location . ,(concat "woman " woman-last-file-name)) | |
| 4536 ;; Use the same form as man's bookmarks, as much as possible. | 4537 ;; Use the same form as man's bookmarks, as much as possible. |
| 4537 (man-args . ,woman-last-file-name) | 4538 (man-args . ,woman-last-file-name) |
| 4538 (handler . woman-bookmark-jump))) | 4539 (handler . woman-bookmark-jump))) |
| 4539 | 4540 |
| 4540 ;;;###autoload | 4541 ;;;###autoload |