diff options
| -rw-r--r-- | lisp/gnus.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus.el b/lisp/gnus.el index 9cd00253486..ba7a2b3c902 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el | |||
| @@ -2,7 +2,7 @@ | |||
| 2 | ;; Copyright (C) 1987, 1988, 1989, 1990, 1993 Free Software Foundation, Inc. | 2 | ;; Copyright (C) 1987, 1988, 1989, 1990, 1993 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | ;; Author: Masanobu UMEDA <umerin@mse.kyutech.ac.jp> | 4 | ;; Author: Masanobu UMEDA <umerin@mse.kyutech.ac.jp> |
| 5 | ;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnus.el,v 1.34 1994/03/12 00:22:13 kwzh Exp rms $ | 5 | ;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnus.el,v 1.35 1994/04/30 04:22:22 rms Exp rms $ |
| 6 | ;; Keywords: news | 6 | ;; Keywords: news |
| 7 | 7 | ||
| 8 | ;; This file is part of GNU Emacs. | 8 | ;; This file is part of GNU Emacs. |
| @@ -824,6 +824,7 @@ the hash tables.") | |||
| 824 | (put 'gnus-article-mode 'mode-class 'special) | 824 | (put 'gnus-article-mode 'mode-class 'special) |
| 825 | 825 | ||
| 826 | (autoload 'gnus-uu-ctl-map "gnus-uu" nil nil 'keymap) | 826 | (autoload 'gnus-uu-ctl-map "gnus-uu" nil nil 'keymap) |
| 827 | (autoload 'gnus-uu-mark-article "gnus-uu" nil t) | ||
| 827 | 828 | ||
| 828 | ;;(put 'gnus-eval-in-buffer-window 'lisp-indent-hook 1) | 829 | ;;(put 'gnus-eval-in-buffer-window 'lisp-indent-hook 1) |
| 829 | 830 | ||
| @@ -1696,6 +1697,7 @@ The hook gnus-exit-gnus-hook is called before actually quitting." | |||
| 1696 | (setq gnus-summary-mode-map (make-keymap)) | 1697 | (setq gnus-summary-mode-map (make-keymap)) |
| 1697 | (suppress-keymap gnus-summary-mode-map) | 1698 | (suppress-keymap gnus-summary-mode-map) |
| 1698 | (define-key gnus-summary-mode-map "\C-c\C-v" 'gnus-uu-ctl-map) | 1699 | (define-key gnus-summary-mode-map "\C-c\C-v" 'gnus-uu-ctl-map) |
| 1700 | (define-key gnus-summary-mode-map "#" 'gnus-uu-mark-article) | ||
| 1699 | (define-key gnus-summary-mode-map " " 'gnus-summary-next-page) | 1701 | (define-key gnus-summary-mode-map " " 'gnus-summary-next-page) |
| 1700 | (define-key gnus-summary-mode-map "\177" 'gnus-summary-prev-page) | 1702 | (define-key gnus-summary-mode-map "\177" 'gnus-summary-prev-page) |
| 1701 | (define-key gnus-summary-mode-map "\r" 'gnus-summary-scroll-up) | 1703 | (define-key gnus-summary-mode-map "\r" 'gnus-summary-scroll-up) |