Re: Binding keys for summary mode

[Jim Burton]

pmlists@free.fr (Peter Münster) writes:

> Jim Burton <jim@sdf-eu.org> writes:
>
>> That lists the bindings but not the keymaps in which they are made. So,
[snip]
>
> From my .gnus.el:
>
Excellent, thankyou Peter.

Jim
> (defun my-alter-summary-map ()
>   (local-set-key (kbd "RET") '(lambda () (interactive)
>                              (gnus-summary-show-article)
>                              (gnus-summary-select-article-buffer)
>                              (delete-other-windows)))
>   (local-set-key "s" '(lambda () (interactive)
>                         (gnus-summary-move-article)
>                         (next-line)))
>   (local-set-key "d" [?M ?M ?e ?e down]))
>
> (defun my-alter-article-map ()
>   (local-set-key "1" 'delete-other-windows)
>   (local-set-key "q" '(lambda () (interactive)
>                         (gnus-article-show-summary)
>                         (delete-other-windows)))
>   (local-set-key "n" "hnh1")
>   (local-set-key "N" "hNh1")
>   (local-set-key "d" "hMMeenh1")
>   (local-set-key "s" '(lambda () (interactive)
>                         (gnus-summary-move-article)
>                         (gnus-summary-next-unread-article)
>                         (gnus-summary-show-article)
>                         (gnus-summary-select-article-buffer)
>                         (delete-other-windows))))
>
> (add-hook 'gnus-summary-mode-hook 'my-alter-summary-map)
> (add-hook 'gnus-article-mode-hook 'my-alter-article-map)
>
>
> HTH,

-- 
J Burton
jim@sdf-eu.org