# HG changeset patch # User Richard M. Stallman # Date 767679742 0 # Node ID 6ecee038c1c9318996b639ab1eab7e5861d85327 # Parent 729f02b2d0640b6c5f743f3e71affd5796a0f9a2 (gnus-summary-mode-map): Bind C-c C-v to gnus-uu-ctl-map. (gnus-uu-ctl-map): Autoload it from gnus-uu. diff -r 729f02b2d064 -r 6ecee038c1c9 lisp/=gnus.el --- a/lisp/=gnus.el Sat Apr 30 02:41:03 1994 +0000 +++ b/lisp/=gnus.el Sat Apr 30 04:22:22 1994 +0000 @@ -2,7 +2,7 @@ ;; Copyright (C) 1987, 1988, 1989, 1990, 1993 Free Software Foundation, Inc. ;; Author: Masanobu UMEDA -;; Version: $Header: /gd/gnu/emacs/19.0/lisp/RCS/gnus.el,v 1.33 1994/02/11 21:56:45 kwzh Exp kwzh $ +;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnus.el,v 1.34 1994/03/12 00:22:13 kwzh Exp rms $ ;; Keywords: news ;; This file is part of GNU Emacs. @@ -823,6 +823,7 @@ (put 'gnus-summary-mode 'mode-class 'special) (put 'gnus-article-mode 'mode-class 'special) +(autoload 'gnus-uu-ctl-map "gnus-uu" nil nil 'keymap) ;;(put 'gnus-eval-in-buffer-window 'lisp-indent-hook 1) @@ -1694,6 +1695,7 @@ nil (setq gnus-summary-mode-map (make-keymap)) (suppress-keymap gnus-summary-mode-map) + (define-key gnus-summary-mode-map "\C-c\C-v" 'gnus-uu-ctl-map) (define-key gnus-summary-mode-map " " 'gnus-summary-next-page) (define-key gnus-summary-mode-map "\177" 'gnus-summary-prev-page) (define-key gnus-summary-mode-map "\r" 'gnus-summary-scroll-up)