Mercurial > hg > xemacs-beta
comparison lisp/help.el @ 280:7df0dd720c89 r21-0b38
Import from CVS: tag r21-0b38
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 10:32:22 +0200 |
| parents | 90d73dddcdc4 |
| children | c42ec1d1cded |
comparison
equal
deleted
inserted
replaced
| 279:c20b2fb5bb0a | 280:7df0dd720c89 |
|---|---|
| 455 (setq help-buffer-list (cdr help-buffer-list))) | 455 (setq help-buffer-list (cdr help-buffer-list))) |
| 456 (setq help-buffer-list (nreverse keep-list)))) | 456 (setq help-buffer-list (nreverse keep-list)))) |
| 457 ;; push new buffer | 457 ;; push new buffer |
| 458 (setq help-buffer-list (cons newbuf help-buffer-list))) | 458 (setq help-buffer-list (cons newbuf help-buffer-list))) |
| 459 | 459 |
| 460 (defvar help-buffer-prefix-string "Help" | |
| 461 "Initial string to use in constructing help buffer names. | |
| 462 You should never set this directory, only let-bind it.") | |
| 463 | |
| 460 (defun help-buffer-name (name) | 464 (defun help-buffer-name (name) |
| 461 "Return a name for a Help buffer using string NAME for context." | 465 "Return a name for a Help buffer using string NAME for context." |
| 462 (if (and (integerp help-max-help-buffers) | 466 (if (and (integerp help-max-help-buffers) |
| 463 (> help-max-help-buffers 0) | 467 (> help-max-help-buffers 0) |
| 464 (stringp name)) | 468 (stringp name)) |
| 465 (format "*Help: %s*" name) | 469 (format "*%s: %s*" help-buffer-prefix-string name) |
| 466 "*Help*")) | 470 (format "*%s*" help-buffer-prefix-string))) |
| 467 | 471 |
| 468 ;; Use this function for displaying help when C-h something is pressed | 472 ;; Use this function for displaying help when C-h something is pressed |
| 469 ;; or in similar situations. Do *not* use it when you are displaying | 473 ;; or in similar situations. Do *not* use it when you are displaying |
| 470 ;; a help message and then prompting for input in the minibuffer -- | 474 ;; a help message and then prompting for input in the minibuffer -- |
| 471 ;; this macro usually selects the help buffer, which is not what you | 475 ;; this macro usually selects the help buffer, which is not what you |