diff options
| -rw-r--r-- | lisp/mail/emacsbug.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el index 44765749fe7..13219a4b444 100644 --- a/lisp/mail/emacsbug.el +++ b/lisp/mail/emacsbug.el | |||
| @@ -430,9 +430,10 @@ usually do not have translators for other languages.\n\n"))) | |||
| 430 | report-emacs-bug-orig-text) | 430 | report-emacs-bug-orig-text) |
| 431 | (error "No text entered in bug report")) | 431 | (error "No text entered in bug report")) |
| 432 | ;; Warning for novice users. | 432 | ;; Warning for novice users. |
| 433 | (unless (or report-emacs-bug-no-confirmation | 433 | (when (and (string-match "bug-gnu-emacs@gnu\\.org" (mail-fetch-field "to")) |
| 434 | (yes-or-no-p | 434 | (not report-emacs-bug-no-confirmation) |
| 435 | "Send this bug report to the Emacs maintainers? ")) | 435 | (not (yes-or-no-p |
| 436 | "Send this bug report to the Emacs maintainers? "))) | ||
| 436 | (with-output-to-temp-buffer "*Bug Help*" | 437 | (with-output-to-temp-buffer "*Bug Help*" |
| 437 | (princ (substitute-command-keys | 438 | (princ (substitute-command-keys |
| 438 | (format "\ | 439 | (format "\ |