[Emacs-diffs] emacs/lisp ChangeLog mail/emacsbug.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/12/10 08:17:19

Modified files:
        lisp           : ChangeLog 
        lisp/mail      : emacsbug.el 

Log message:
        (report-emacs-bug): Use whichever send command is appropriate for the
        mail-user-agent in use.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16876&r2=1.16877
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/emacsbug.el?cvsroot=emacs&r1=1.93&r2=1.94

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16876
retrieving revision 1.16877
diff -u -b -r1.16876 -r1.16877
--- ChangeLog   9 Dec 2009 10:23:00 -0000       1.16876
+++ ChangeLog   10 Dec 2009 08:17:15 -0000      1.16877
@@ -1,3 +1,8 @@
+2009-12-10  Glenn Morris  <address@hidden>
+
+       * mail/emacsbug.el (report-emacs-bug): Use whichever send command is
+       appropriate for the mail-user-agent in use.
+
 2009-12-09  Michael Albinus  <address@hidden>
 
        * net/tramp.el (tramp-handle-insert-directory): Suppress error messages.
@@ -225,13 +230,10 @@
 
 2009-12-06  Ulf Jasper  <address@hidden>
 
-       * net/newst-backend.el :
-       * net/newst-plainview.el:
-       * net/newst-reader.el:
-       * net/newst-ticker.el:
-       * net/newst-treeview.el:
-       * net/newsticker.el: Require/provide newst-... (instead of
-       newsticker-...). (Bug#5096)
+       * net/newst-backend.el, net/newst-plainview.el:
+       * net/newst-reader.el, net/newst-ticker.el:
+       * net/newst-treeview.el, net/newsticker.el:
+       Require/provide newst-... (instead of newsticker-...).  (Bug#5096)
 
 2009-12-06  Chong Yidong  <address@hidden>
 
@@ -247,13 +249,12 @@
 
 2009-12-06  Ulf Jasper  <address@hidden>
 
-       * xml.el (xml-substitute-numeric-entities): Moved
+       * xml.el (xml-substitute-numeric-entities): Move
        newsticker--decode-numeric-entities in newst-backend.el to
        xml-substitute-numeric-entities in xml.el. (Bug#5008)
-
        * net/newst-backend.el (newsticker--parse-generic-feed)
        (newsticker--parse-generic-items)
-       (newsticker--decode-numeric-entities): Moved
+       (newsticker--decode-numeric-entities): Move
        newsticker--decode-numeric-entities in newst-backend.el to
        xml-substitute-numeric-entities in xml.el. (Bug#5008)
 
@@ -263,8 +264,7 @@
 
 2009-12-06  Chong Yidong  <address@hidden>
 
-       * ansi-color.el (ansi-color-for-comint-mode): Add :version
-       keyword.
+       * ansi-color.el (ansi-color-for-comint-mode): Add :version keyword.
 
 2009-12-06  Roland Winkler  <address@hidden>
 
@@ -282,10 +282,10 @@
 2009-12-06  Kevin Ryde  <address@hidden>
 
        * ffap.el (ffap-rfc-path): Make this a defcustom since
-       `ffap-rfc-directories' is also a defcustom.  (My Bug#4514.)
+       `ffap-rfc-directories' is also a defcustom.  (Bug#4514.)
 
        * info-look.el: Add setup for apropos-mode to use emacs-lisp-mode
-       manuals, similar to existing setup for help-mode.  (My bug#3913.)
+       manuals, similar to existing setup for help-mode.  (Bug#3913.)
 
 2009-12-05  Juri Linkov  <address@hidden>
 
@@ -1160,8 +1160,7 @@
 2009-11-24  Kevin Ryde  <address@hidden>
 
        * emacs-lisp/checkdoc.el (checkdoc-proper-noun-regexp):
-       Build value with regexp-opt instead of explicit joining loop.  (My
-       Bug#4927.)
+       Build value with regexp-opt instead of explicit joining loop.  
(Bug#4927)
 
        * emacs-lisp/elint.el (elint-add-required-env): Better error message
        when .el source file not found or other error.
@@ -3383,7 +3382,7 @@
        * emacs-lisp/checkdoc.el (checkdoc-file-comments-engine):
        When inserting ";;; Code" put it before any ";;;###autoload" cookie on
        the first form.  And insert a blank line after ";;; Code" since
-       that's usual style.  (My Bug#4612.)
+       that's usual style.  (Bug#4612)
 
        * net/dns.el: Add "Keywords: comm", as per net/net-utils.el.
 

Index: mail/emacsbug.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/emacsbug.el,v
retrieving revision 1.93
retrieving revision 1.94
diff -u -b -r1.93 -r1.94
--- mail/emacsbug.el    31 Oct 2009 02:13:41 -0000      1.93
+++ mail/emacsbug.el    10 Dec 2009 08:17:19 -0000      1.94
@@ -226,9 +226,17 @@
     (unless report-emacs-bug-no-explanations
       (with-output-to-temp-buffer "*Bug Help*"
        (princ "While in the mail buffer:\n\n")
-       (if (eq mail-user-agent 'sendmail-user-agent)
+        (let ((send
+               (cond ((eq mail-user-agent 'sendmail-user-agent)
+                      "mail-send-and-exit")
+                     ((memq mail-user-agent '(message-user-agent
+                                              gnus-user-agent))
+                      "message-send-and-exit")
+                     ((eq mail-user-agent 'mh-e-user-agent)
+                      "mh-send-letter"))))
+          (when send
            (princ (substitute-command-keys
-                   "  Type \\[mail-send-and-exit] to send the bug report.\n")))
+                    (format "  Type \\[%s] to send the bug report.\n" send)))))
        (princ (substitute-command-keys
                "  Type \\[kill-buffer] RET to cancel (don't send it).\n"))
        (terpri)