diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-12-11 18:58:41 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-12-11 18:58:41 +0100 |
| commit | b04f322a9bd0e5376eca0d4c2961a8a076eeb9bb (patch) | |
| tree | 2d197bf21285dcdf58880d0b40036d80195e0b00 /lisp/emacs-lisp/memory-report.el | |
| parent | c7c261ebdf0232cc9263e8f8cbcc851a933076e0 (diff) | |
| download | emacs-b04f322a9bd0e5376eca0d4c2961a8a076eeb9bb.tar.gz emacs-b04f322a9bd0e5376eca0d4c2961a8a076eeb9bb.tar.bz2 emacs-b04f322a9bd0e5376eca0d4c2961a8a076eeb9bb.zip | |
Also sort the totals section by size
* lisp/emacs-lisp/memory-report.el (memory-report): Sort the
totals by size, too.
Diffstat (limited to 'lisp/emacs-lisp/memory-report.el')
| -rw-r--r-- | lisp/emacs-lisp/memory-report.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/memory-report.el b/lisp/emacs-lisp/memory-report.el index 0184c7ed8a5..c88d9f2768a 100644 --- a/lisp/emacs-lisp/memory-report.el +++ b/lisp/emacs-lisp/memory-report.el @@ -59,7 +59,9 @@ by counted more than once." (if (listp report) (push report summaries) (push report details))) - (dolist (summary (nreverse summaries)) + (dolist (summary (seq-sort (lambda (e1 e2) + (> (cdr e1) (cdr e2))) + summaries)) (insert (format "%s %s\n" (memory-report--format (cdr summary)) (car summary)))) |