Mercurial > emacs

changeset 8504:8c492f23ee28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(view-lossage): Handle buffers and frames in recent-keys.
author Richard M. Stallman <rms@gnu.org>
date Wed, 10 Aug 1994 04:08:26 +0000
parents 084456e12635
children d3f7cadf8c95
files lisp/help.el
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/help.el	Wed Aug 10 03:39:47 1994 +0000
+++ b/lisp/help.el	Wed Aug 10 04:08:26 1994 +0000
@@ -287,7 +287,14 @@
   "Display last 100 input keystrokes."
   (interactive)
   (with-output-to-temp-buffer "*Help*"
-    (princ (key-description (recent-keys)))
+    (princ (mapconcat (function (lambda (key)
+				  (if (or (integerp key)
+					  (symbolp key)
+					  (listp key))
+				      (single-key-description key)
+				    (prin1-to-string key nil))))
+		      (recent-keys)
+		      " "))
     (save-excursion
       (set-buffer standard-output)
       (goto-char (point-min))