(report-emacs-bug): Request that backtraces are

included when reporting an emacs crash, and tell about the DEBUG file.

diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index bc6060f40c4bec255ccd64733a6147421b2c2678..2eea86e7a4a4f0d96e99b79fa5db7f1cb68bdb38 100644 (file)
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -125,9 +125,18 @@ usually do not have translators to read other languages for them.\n\n")
 
     (insert "\n\n")
     (setq user-point (point))
-    (insert "\n\n\n")
+    (insert "\n\n")
+
+    (insert "If emacs crashed, and you have the emacs process in the gdb debugger,\n"
+           "please include the output from the following gdb commands:\n"
+           "    `bt full' and `xbacktrace'.\n")
+
+    (let ((debug-file (expand-file-name "DEBUG" data-directory)))
+      (if (file-readable-p debug-file)
+       (insert "If you would like to further debug the crash, please read the file\n"
+               debug-file " for instructions.\n")))
 
-    (insert "In " (emacs-version) "\n")
+    (insert "\n\nIn " (emacs-version) "\n")
     (if (fboundp 'x-server-vendor)
        (condition-case nil
            (insert "X server distributor `" (x-server-vendor) "', version "