usr/contrib/lib/emacs/lisp/help.elc


(defvar help-map (make-sparse-keymap) "\
Keymap for characters following the Help key.")

(define-key global-map "\b" (quote help-command))

(fset (quote help-command) help-map)

(define-key help-map "\b" (quote help-for-help))

(define-key help-map "?" (quote help-for-help))

(define-key help-map "\ 3" (quote describe-copying))

(define-key help-map "\ 4" (quote describe-distribution))

(define-key help-map "\17" (quote describe-no-warranty))

(define-key help-map "a" (quote command-apropos))

(define-key help-map "b" (quote describe-bindings))

(define-key help-map "c" (quote describe-key-briefly))

(define-key help-map "k" (quote describe-key))

(define-key help-map "d" (quote describe-function))

(define-key help-map "f" (quote describe-function))

(define-key help-map "i" (quote info))

(define-key help-map "l" (quote view-lossage))

(define-key help-map "m" (quote describe-mode))

(define-key help-map "\ e" (quote view-emacs-news))

(define-key help-map "n" (quote view-emacs-news))

(define-key help-map "s" (quote describe-syntax))

(define-key help-map "t" (quote help-with-tutorial))

(define-key help-map "w" (quote where-is))

(define-key help-map "v" (quote describe-variable))

(defun help-with-tutorial nil "\
Select the Emacs learn-by-doing tutorial." (interactive) (byte-code "Ä\88ÆÇ!\18È \88É\b!\83\17