Mercurial > emacs
changeset 36277:ab9c82e64020
(view-order-manuals): New function.
(toplevel): Bind C-h C-m to this function.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Thu, 22 Feb 2001 11:18:03 +0000 |
parents | 96ecc8142696 |
children | 8487fd519144 |
files | lisp/help.el |
diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help.el Thu Feb 22 11:17:41 2001 +0000 +++ b/lisp/help.el Thu Feb 22 11:18:03 2001 +0000 @@ -1,6 +1,7 @@ ;;; help.el --- help commands for Emacs -;; Copyright (C) 1985, 1986, 1993, 1994, 1998, 1999, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1985, 1986, 1993, 1994, 1998, 1999, 2000, 2001 +;; Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: help, internal @@ -75,6 +76,7 @@ (define-key help-map "l" 'view-lossage) (define-key help-map "m" 'describe-mode) +(define-key help-map "\C-m" 'view-order-manuals) (define-key help-map "\C-n" 'view-emacs-news) (define-key help-map "n" 'view-emacs-news) @@ -448,6 +450,11 @@ (find-file-read-only (expand-file-name file data-directory)) (error "No such old news")))) +(defun view-order-manuals () + "Display the Emacs ORDERS file." + (interactive) + (find-file-read-only (expand-file-name "ORDERS" data-directory))) + (defun view-emacs-FAQ () "Display the Emacs Frequently Asked Questions (FAQ) file." (interactive)