# HG changeset patch # User Richard M. Stallman # Date 741812154 0 # Node ID e50f7b531c7ff39c8eaf005211702268fb4c4155 # Parent e6814dfc4b3b0cb0736fd6c582e4144411906264 (describe-prefix-bindings): Doc fix. diff -r e6814dfc4b3b -r e50f7b531c7f lisp/help.el --- a/lisp/help.el Sun Jul 04 18:54:59 1993 +0000 +++ b/lisp/help.el Sun Jul 04 18:55:54 1993 +0000 @@ -210,6 +210,9 @@ (recenter 0))) (defun describe-prefix-bindings () + "Describe the bindings of the prefix used to reach this command. +The prefix described consists of all but the last event +of the key sequence that ran this command." (interactive) (let* ((key (this-command-keys)) (prefix (make-vector (1- (length key)) nil)) @@ -219,6 +222,8 @@ (aset prefix i (aref key i)) (setq i (1+ i))) (describe-bindings prefix))) +;; Make C-h after a prefix, when not specifically bound, +;; run describe-prefix-bindings. (setq prefix-help-command 'describe-prefix-bindings) (defun view-emacs-news ()