Commits

Anonymous committed 49d5f73

Fix formatting

  • Participants
  • Parent commits a5cc6d7

Comments (0)

Files changed (1)

File files/ibuffer-defs.el

 
 (define-ibuffer-column size-h
   (:name "Size"
-         :inline t
-         :summarizer
-         (lambda (column-strings)
-           (let ((total 0))
-             (dolist (string column-strings)
-               (setq total
-                     ;; like, ewww ...
-                     (+
-                      (let ((number (float (string-to-number string))))
-                        (cond
-                         ((string-match-p "K" string)
-                          (* number 1000))
-                         ((string-match-p "M" string)
-                          (* number 1000000))
-                         (t number)))
-                      total)))
-             (file-size-human-readable total 'si))))
+   :inline t
+   :summarizer
+   (lambda (column-strings)
+     (let ((total 0))
+       (dolist (string column-strings)
+         (setq total
+               ;; like, ewww ...
+               (+
+                (let ((number (float (string-to-number string))))
+                  (cond
+                   ((string-match-p "K" string)
+                    (* number 1000))
+                   ((string-match-p "M" string)
+                    (* number 1000000))
+                   (t number)))
+                total)))
+       (file-size-human-readable total 'si))))
   (file-size-human-readable (buffer-size) 'si))
 
 ;; Modify the default ibuffer-formats