Mercurial > hg > xemacs-beta
comparison lisp/help.el @ 1038:4bc5bb3ea5ad
[xemacs-hg @ 2002-10-08 03:36:09 by youngs]
2002-09-03 John Paul Wallington <jpw@shootybangbang.com>
* help.el (view-lossage): Change interactive spec to "P".
author | youngs |
---|---|
date | Tue, 08 Oct 2002 03:36:13 +0000 |
parents | 42375619fa45 |
children | 37bdd24225ef |
comparison
equal
deleted
inserted
replaced
1037:3a01f3148bff | 1038:4bc5bb3ea5ad |
---|---|
880 "warnings")) | 880 "warnings")) |
881 | 881 |
882 (defun view-lossage (&optional no-keys) | 882 (defun view-lossage (&optional no-keys) |
883 "Display recent input keystrokes and recent minibuffer messages. | 883 "Display recent input keystrokes and recent minibuffer messages. |
884 The number of keys shown is controlled by `view-lossage-key-count'. | 884 The number of keys shown is controlled by `view-lossage-key-count'. |
885 The number of messages shown is controlled by `view-lossage-message-count'." | 885 The number of messages shown is controlled by `view-lossage-message-count'. |
886 (interactive) | 886 |
887 If optional arg NO-KEYS (prefix arg, interactively) is non-nil, | |
888 then recent input keystrokes output is omitted." | |
889 (interactive "P") | |
887 (with-displaying-help-buffer | 890 (with-displaying-help-buffer |
888 (lambda () | 891 (lambda () |
889 (unless no-keys | 892 (unless no-keys |
890 (princ (key-description (recent-keys view-lossage-key-count))) | 893 (princ (key-description (recent-keys view-lossage-key-count))) |
891 (save-excursion | 894 (save-excursion |