Mercurial > hg > xemacs-beta
comparison lisp/help.el @ 227:0e522484dd2a r20-5b12
Import from CVS: tag r20-5b12
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:12:37 +0200 |
parents | 2c611d1463a6 |
children | 434959a2fba3 |
comparison
equal
deleted
inserted
replaced
226:eea38c7ad7b4 | 227:0e522484dd2a |
---|---|
38 | 38 |
39 ;; Get the macro make-help-screen when this is compiled, | 39 ;; Get the macro make-help-screen when this is compiled, |
40 ;; or run interpreted, but not when the compiled code is loaded. | 40 ;; or run interpreted, but not when the compiled code is loaded. |
41 (eval-when-compile (require 'help-macro)) | 41 (eval-when-compile (require 'help-macro)) |
42 | 42 |
43 (defgroup help nil | |
44 "Support for on-line help systems." | |
45 :group 'emacs) | |
46 | |
43 (defgroup help-appearance nil | 47 (defgroup help-appearance nil |
44 "Appearance of help buffers" | 48 "Appearance of help buffers." |
45 :group 'help) | 49 :group 'help) |
46 | 50 |
47 (defvar help-map (let ((map (make-sparse-keymap))) | 51 (defvar help-map (let ((map (make-sparse-keymap))) |
48 (set-keymap-name map 'help-map) | 52 (set-keymap-name map 'help-map) |
49 (set-keymap-prompt | 53 (set-keymap-prompt |