diff options
| author | John Turner <jturner.usa@gmail.com> | 2023-07-16 00:45:01 -0400 |
|---|---|---|
| committer | John Turner <jturner.usa@gmail.com> | 2023-07-16 00:45:01 -0400 |
| commit | 4058ea89d9c6a82ec0dac504e7205cbf22c9ceb3 (patch) | |
| tree | b49cc7c8493e7c277a23f10c324fc4fde9967418 /init/ibuffer/init-ibuffer-human-readable-size.el | |
| parent | e166c4beaeddbf362e500ac20bd03c37a69a0ac0 (diff) | |
| download | emacs.d-4058ea89d9c6a82ec0dac504e7205cbf22c9ceb3.tar.gz | |
converted init code to use use-package
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) |