Mercurial > hg > xemacs-beta
comparison lisp/help.el @ 420:41dbb7a9d5f2 r21-2-18
Import from CVS: tag r21-2-18
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:24:09 +0200 |
parents | 697ef44129c6 |
children |
comparison
equal
deleted
inserted
replaced
419:66615b78f1a5 | 420:41dbb7a9d5f2 |
---|---|
459 (defun help-buffer-name (name) | 459 (defun help-buffer-name (name) |
460 "Return a name for a Help buffer using string NAME for context." | 460 "Return a name for a Help buffer using string NAME for context." |
461 (if (and (integerp help-max-help-buffers) | 461 (if (and (integerp help-max-help-buffers) |
462 (> help-max-help-buffers 0) | 462 (> help-max-help-buffers 0) |
463 (stringp name)) | 463 (stringp name)) |
464 (format "*%s: %s*" help-buffer-prefix-string name) | 464 (if help-buffer-prefix-string |
465 (format "*%s: %s*" help-buffer-prefix-string name) | |
466 (format "*%s*" name)) | |
465 (format "*%s*" help-buffer-prefix-string))) | 467 (format "*%s*" help-buffer-prefix-string))) |
466 | 468 |
467 ;; Use this function for displaying help when C-h something is pressed | 469 ;; Use this function for displaying help when C-h something is pressed |
468 ;; or in similar situations. Do *not* use it when you are displaying | 470 ;; or in similar situations. Do *not* use it when you are displaying |
469 ;; a help message and then prompting for input in the minibuffer -- | 471 ;; a help message and then prompting for input in the minibuffer -- |