mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-19 18:13:55 +00:00
Code Issues Releases Activity

(gnus-group-mode-map, gnus-summary-mode-map):

Browse Source 
Add bindings for up and down keys.
This commit is contained in:
Richard M. Stallman 1994-05-12 06:39:49 +00:00
parent 7e93368366
commit 98df0a52f3
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/gnus.el
View File

@ -2,7 +2,6 @@
;; Copyright (C) 1987,88,89,90,93,94 Free Software Foundation, Inc.
;; Author: Masanobu UMEDA <umerin@mse.kyutech.ac.jp>
;; Version: $Header: /gd/gnu/emacs/19.0/lisp/RCS/gnus.el,v 1.36 1994/04/30 20:15:08 rms Exp kwzh $
;; Keywords: news
;; This file is part of GNU Emacs.
@ -940,6 +939,8 @@ Optional argument HASHSIZE specifies the table size."
(define-key gnus-group-mode-map "P" 'gnus-group-prev-group)
(define-key gnus-group-mode-map "\C-n" 'gnus-group-next-group)
(define-key gnus-group-mode-map "\C-p" 'gnus-group-prev-group)
(define-key gnus-group-mode-map [down] 'gnus-group-next-group)
(define-key gnus-group-mode-map [up] 'gnus-group-up-group)
(define-key gnus-group-mode-map "\r" 'next-line)
;;(define-key gnus-group-mode-map "/" 'isearch-forward)
(define-key gnus-group-mode-map "<" 'beginning-of-buffer)
@ -1713,6 +1714,8 @@ The hook gnus-exit-gnus-hook is called before actually quitting."
(define-key gnus-summary-mode-map "\C-c\C-p" 'gnus-summary-prev-digest)
(define-key gnus-summary-mode-map "\C-n" 'gnus-summary-next-subject)
(define-key gnus-summary-mode-map "\C-p" 'gnus-summary-prev-subject)
(define-key gnus-summary-mode-map [down] 'gnus-summary-next-subject)
(define-key gnus-summary-mode-map [up] 'gnus-summary-prev-subject)
(define-key gnus-summary-mode-map "\en" 'gnus-summary-next-unread-subject)
(define-key gnus-summary-mode-map "\ep" 'gnus-summary-prev-unread-subject)
;;(define-key gnus-summary-mode-map "\C-cn" 'gnus-summary-next-group)