[ELPA-diffs] /srv/bzr/emacs/elpa r179: * memory-usage.el (memory-usage): Fix vector size display.

[Stefan Monnier]

------------------------------------------------------------
revno: 179
committer: Stefan Monnier <address@hidden>
branch nick: elpa
timestamp: Tue 2012-03-13 22:32:56 -0400
message:
  * memory-usage.el (memory-usage): Fix vector size display.
modified:
  packages/memory-usage/memory-usage.el

=== modified file 'packages/memory-usage/memory-usage.el'
--- a/packages/memory-usage/memory-usage.el     2011-10-23 07:38:40 +0000
+++ b/packages/memory-usage/memory-usage.el     2012-03-14 02:32:56 +0000
@@ -1,6 +1,6 @@
 ;;; memory-usage.el --- Analyze the memory usage of Emacs in various ways
 
-;; Copyright (C) 2002, 2004  Free Software Foundation, Inc.
+;; Copyright (C) 2002, 2004, 2012  Free Software Foundation, Inc.
 
 ;; Author: Stefan Monnier <address@hidden>
 ;; Keywords: maint
@@ -78,10 +78,12 @@
     (insert (format "\t%d+%d bytes in symbols\n" (car symbols) (cdr symbols)))
     (insert (format "\t%d+%d bytes in markers\n" (car markers) (cdr markers)))
     (insert (format "\t%d+%d bytes in floats\n" (car floats) (cdr floats)))
-    (insert (format "\t%d+%d bytes in intervals\n" (car intervals) (cdr 
intervals)))
-    (insert (format "\t%d+%d bytes in string headers\n" (car strings) (cdr 
strings)))
+    (insert (format "\t%d+%d bytes in intervals\n"
+                    (car intervals) (cdr intervals)))
+    (insert (format "\t%d+%d bytes in string headers\n"
+                    (car strings) (cdr strings)))
     (insert (format "\t%d bytes of string chars\n" chars))
-    (insert (format "\t%d bytes of vector slots\n" chars))
+    (insert (format "\t%d bytes of vector slots\n" vectors))
     (let ((live (+ (car conses)
                    (car symbols)
                    (car markers)