diff options
| author | Eric Abrahamsen | 2018-11-28 09:31:40 -0800 |
|---|---|---|
| committer | Eric Abrahamsen | 2018-11-28 09:31:40 -0800 |
| commit | e8d7e3a59a05917b94b6803c123be97ccd693f0d (patch) | |
| tree | 2dba6045d4e28c8cc189c71b61d39981213cf6ff | |
| parent | 415ef4a2b02dac17bf1bb962154633e671e561dd (diff) | |
| download | emacs-e8d7e3a59a05917b94b6803c123be97ccd693f0d.tar.gz emacs-e8d7e3a59a05917b94b6803c123be97ccd693f0d.zip | |
Further small tweaks to Gnus modes cleanup
* lisp/gnus/gnus-sum.el: Remove explicit definition of
`gnus-summary-mode-hook', this is now created automatically.
* lisp/gnus/nnir.el (nnir-open-server): Attach `nnir-mode' to the
`gnus-summary-prepared-hook', instead of
`gnus-summary-mode-hook'. The latter no longer has access to the
buffer-local value of `gnus-newsgroup-name', which `nnir-mode'
needs.
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 7 | ||||
| -rw-r--r-- | lisp/gnus/nnir.el | 2 |
2 files changed, 1 insertions, 8 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 7be52717de9..4baf4bc8263 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -946,13 +946,6 @@ This variable is local to the summary buffers." | |||
| 946 | :type '(choice (const :tag "off" nil) | 946 | :type '(choice (const :tag "off" nil) |
| 947 | integer)) | 947 | integer)) |
| 948 | 948 | ||
| 949 | (defcustom gnus-summary-mode-hook nil | ||
| 950 | "A hook for Gnus summary mode. | ||
| 951 | This hook is run before any variables are set in the summary buffer." | ||
| 952 | :options '(turn-on-gnus-mailing-list-mode gnus-pick-mode) | ||
| 953 | :group 'gnus-summary-various | ||
| 954 | :type 'hook) | ||
| 955 | |||
| 956 | (defcustom gnus-summary-menu-hook nil | 949 | (defcustom gnus-summary-menu-hook nil |
| 957 | "Hook run after the creation of the summary mode menu." | 950 | "Hook run after the creation of the summary mode menu." |
| 958 | :group 'gnus-summary-visual | 951 | :group 'gnus-summary-visual |
diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el index 084b154e8a1..62ac5048641 100644 --- a/lisp/gnus/nnir.el +++ b/lisp/gnus/nnir.el | |||
| @@ -657,7 +657,7 @@ skips all prompting." | |||
| 657 | (let ((backend (car (gnus-server-to-method server)))) | 657 | (let ((backend (car (gnus-server-to-method server)))) |
| 658 | (if backend | 658 | (if backend |
| 659 | (nnoo-change-server backend server definitions) | 659 | (nnoo-change-server backend server definitions) |
| 660 | (add-hook 'gnus-summary-mode-hook 'nnir-mode) | 660 | (add-hook 'gnus-summary-prepared-hook 'nnir-mode) |
| 661 | (nnoo-change-server 'nnir server definitions)))) | 661 | (nnoo-change-server 'nnir server definitions)))) |
| 662 | 662 | ||
| 663 | (deffoo nnir-request-group (group &optional server dont-check _info) | 663 | (deffoo nnir-request-group (group &optional server dont-check _info) |