summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2001-02-22 11:18:03 +0000
committerGerd Moellmann <gerd@gnu.org>2001-02-22 11:18:03 +0000
commit754084bb4231fe33fba8d5405b12f89188d60473 (patch)
treefd6994592ea0114c2fccd3c96c28632cf4d3b5a8 /lisp
parentac0a46469fbab9d8e0c4ef768e17bc0024ed8980 (diff)
downloademacs-754084bb4231fe33fba8d5405b12f89188d60473.tar.gz
(view-order-manuals): New function.
(toplevel): Bind C-h C-m to this function.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/help.el9
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/help.el b/lisp/help.el
index 2235141eb35..a0d69bbd80b 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -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 @@ With numeric argument, display information on correspondingly older changes."
(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)