From a41475e146758ae24e800bbb18fd3fae4b5ef3b7 Mon Sep 17 00:00:00 2001 From: Daniel Colascione Date: Sat, 22 Mar 2014 23:16:14 -0700 Subject: [PATCH] Backport memory info in bug reports (2014-03-21T21:27:25Z!dancol@dancol.org) from trunk --- lisp/ChangeLog | 5 +++++ lisp/mail/emacsbug.el | 4 ++++ 2 files changed, 9 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2a0840031b2..b73bb1e67d5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-03-21 Daniel Colascione + + * mail/emacsbug.el (report-emacs-bug): Include memory usage + information in bug reports. + 2014-03-23 Daniel Colascione * emacs-lisp/cl-macs.el (cl--do-arglist): Use a little `cl-loop' diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el index 0f72d24ed1e..b994949e94d 100644 --- a/lisp/mail/emacsbug.el +++ b/lisp/mail/emacsbug.el @@ -322,6 +322,10 @@ usually do not have translators for other languages.\n\n"))) shadows))) (insert (format "\nFeatures:\n%s\n" features)) (fill-region (line-beginning-position 0) (point)) + + (insert (format "\nMemory information:\n")) + (pp (garbage-collect) (current-buffer)) + ;; This is so the user has to type something in order to send easily. (use-local-map (nconc (make-sparse-keymap) (current-local-map))) (define-key (current-local-map) "\C-c\C-i" 'info-emacs-bug) -- 2.39.5