Commit 298a7c8c authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(view-lossage): Handle buffers and frames in recent-keys.

parent 0691ced3
......@@ -287,7 +287,14 @@ of the key sequence that ran this command."
"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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment