diff options
Diffstat (limited to 'init/ibuffer/init-ibuffer-human-readable-size.el')
-rw-r--r-- | init/ibuffer/init-ibuffer-human-readable-size.el | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/init/ibuffer/init-ibuffer-human-readable-size.el b/init/ibuffer/init-ibuffer-human-readable-size.el deleted file mode 100644 index 6d62521..0000000 --- a/init/ibuffer/init-ibuffer-human-readable-size.el +++ /dev/null @@ -1,16 +0,0 @@ -(define-ibuffer-column size-human-readable - (:name "Size" :inline t) - (let ((size (buffer-size))) - (cond - ((> size (expt 1000 4)) - (error "buffer is over 1TB large!")) - ((> size (expt 1000 3)) - (format "%sG" (/ size (expt 1000 3)))) - ((> size (expt 1000 2)) - (format "%sM" (/ size (expt 1000 2)))) - ((> size 1000) - (format "%sK" (/ size 1000))) - (t - (format "%sB" size))))) - -(provide 'init-ibuffer-human-readable-size) |