Mercurial > emacs
comparison lisp/gnus/gnus-art.el @ 109396:8b1192833a1e
Allow bookmarks to be set from Gnus Article buffers (Bug #5975).
Patch applied (with minor tweaks) by Karl Fogel. Note this leaves
C-w still not working correctly from Article buffers; Thierry's
patch to fix that will be applied after this.
* lisp/gnus/gnus-art.el (bookmark-make-record-function): New local variable.
* lisp/gnus/gnus-sum.el (gnus-summary-bookmark-make-record): Allow setting
from article buffer.
(gnus-summary-bookmark-jump): Maybe jump to article buffer.
| author | Karl Fogel <kfogel@red-bean.com> |
|---|---|
| date | Wed, 14 Jul 2010 12:02:53 -0400 |
| parents | 98ae5d8b7b72 |
| children | 93dfb9cac00f |
comparison
equal
deleted
inserted
replaced
| 109395:fa4400531412 | 109396:8b1192833a1e |
|---|---|
| 4450 (make-local-variable 'gnus-article-mime-handle-alist) | 4450 (make-local-variable 'gnus-article-mime-handle-alist) |
| 4451 (make-local-variable 'gnus-article-wash-types) | 4451 (make-local-variable 'gnus-article-wash-types) |
| 4452 (make-local-variable 'gnus-article-image-alist) | 4452 (make-local-variable 'gnus-article-image-alist) |
| 4453 (make-local-variable 'gnus-article-charset) | 4453 (make-local-variable 'gnus-article-charset) |
| 4454 (make-local-variable 'gnus-article-ignored-charsets) | 4454 (make-local-variable 'gnus-article-ignored-charsets) |
| 4455 (set (make-local-variable 'bookmark-make-record-function) | |
| 4456 'gnus-summary-bookmark-make-record) | |
| 4455 ;; Prevent Emacs 22 from displaying non-break space with `nobreak-space' | 4457 ;; Prevent Emacs 22 from displaying non-break space with `nobreak-space' |
| 4456 ;; face. | 4458 ;; face. |
| 4457 (set (make-local-variable 'nobreak-char-display) nil) | 4459 (set (make-local-variable 'nobreak-char-display) nil) |
| 4458 (setq cursor-in-non-selected-windows nil) | 4460 (setq cursor-in-non-selected-windows nil) |
| 4459 (setq truncate-lines gnus-article-truncate-lines) | 4461 (setq truncate-lines gnus-article-truncate-lines) |