(report-emacs-bug): New argument recent-keys read before bug subject
to capture more relevant recent input.
This commit is contained in:
parent
3282a60689
commit
47a1e7a2c4
1 changed files with 4 additions and 3 deletions
|
@ -47,10 +47,11 @@
|
|||
"The automatically-created initial text of bug report.")
|
||||
|
||||
;;;###autoload
|
||||
(defun report-emacs-bug (topic)
|
||||
(defun report-emacs-bug (recent-keys topic)
|
||||
"Report a bug in GNU Emacs.
|
||||
Prompts for bug subject. Leaves you in a mail buffer."
|
||||
(interactive "sBug Subject: ")
|
||||
(interactive (list (recent-keys)
|
||||
(read-string "Bug Subject: ")))
|
||||
(if (mail nil
|
||||
(if (string-match "\\..*\\..*\\." emacs-version)
|
||||
;; If there are four numbers in emacs-version,
|
||||
|
@ -81,7 +82,7 @@ Prompts for bug subject. Leaves you in a mail buffer."
|
|||
(listp key))
|
||||
(single-key-description key)
|
||||
(prin1-to-string key nil)))
|
||||
(recent-keys)
|
||||
recent-keys
|
||||
" "))
|
||||
(save-restriction
|
||||
(narrow-to-region before-keys (point))
|
||||
|
|
Loading…
Add table
Reference in a new issue