diff options
author | Grégoire Jadi <daimrod@gmail.com> | 2013-06-12 09:08:17 -0700 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2013-06-12 09:08:17 -0700 |
commit | 868490bbe111400d4a33e0e4e0ad06e3b096a0ce (patch) | |
tree | 04b82d35713f4a12d65685907fd75aea005889bc /lisp/mail/reporter.el | |
parent | 02a87775d4ee494309408f4bd0eddbaba6394011 (diff) | |
download | emacs-868490bbe111400d4a33e0e4e0ad06e3b096a0ce.tar.gz |
* mail/reporter.el (reporter-submit-bug-report): Handle missing package-name.
Fixes: debbugs:14600
Diffstat (limited to 'lisp/mail/reporter.el')
-rw-r--r-- | lisp/mail/reporter.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/mail/reporter.el b/lisp/mail/reporter.el index cc20c5c06ea..8f6715018c4 100644 --- a/lisp/mail/reporter.el +++ b/lisp/mail/reporter.el @@ -341,10 +341,10 @@ mail-sending package is used for editing and sending the message." (mail-position-on-field "to") (insert address) ;; insert problem summary if available - (if (and reporter-prompt-for-summary-p problem pkgname) - (progn - (mail-position-on-field "subject") - (insert pkgname "; " problem))) + (when (and reporter-prompt-for-summary-p problem) + (mail-position-on-field "subject") + (if pkgname (insert pkgname "; ")) + (insert problem)) ;; move point to the body of the message (mail-text) (forward-line 1) |