diff options
Diffstat (limited to 'config/ibuffer/config-ibuffer-human-readable-size.el')
| -rw-r--r-- | config/ibuffer/config-ibuffer-human-readable-size.el | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/config/ibuffer/config-ibuffer-human-readable-size.el b/config/ibuffer/config-ibuffer-human-readable-size.el deleted file mode 100644 index 5cec3a9..0000000 --- a/config/ibuffer/config-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 'config-ibuffer-human-readable-size) |