diff options
author | William Carroll <wpcarro@gmail.com> | 2020-08-31T16·05+0100 |
---|---|---|
committer | William Carroll <wpcarro@gmail.com> | 2020-08-31T16·08+0100 |
commit | ff8277625f43c1354b63333090f72c277c1f43f8 (patch) | |
tree | 901594d4fee2031477ae7821f5bc9ef40474232a /emacs/.emacs.d/wpc/bytes.el | |
parent | 5d3bb0b7eadc9efc423eb7ef8857fa6df256d254 (diff) |
Lint prelude.el
This was a doozey because I use it everywhere. Is there a better way to globally rename things? Aye aye aye... computers, man!
Diffstat (limited to 'emacs/.emacs.d/wpc/bytes.el')
-rw-r--r-- | emacs/.emacs.d/wpc/bytes.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/emacs/.emacs.d/wpc/bytes.el b/emacs/.emacs.d/wpc/bytes.el index d8bd2e288614..9780a8efc426 100644 --- a/emacs/.emacs.d/wpc/bytes.el +++ b/emacs/.emacs.d/wpc/bytes.el @@ -64,7 +64,7 @@ (defun bytes/classify (x) "Return unit that closest fits byte count, X." - (prelude/assert (number/whole? x)) + (prelude-assert (number/whole? x)) (cond ((and (>= x 0) (< x bytes/kb)) 'byte) ((and (>= x bytes/kb) (< x bytes/mb)) 'kilobyte) @@ -92,17 +92,17 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (progn - (prelude/assert + (prelude-assert (equal "1000B" (bytes/to-string 1000))) - (prelude/assert + (prelude-assert (equal "2KB" (bytes/to-string (* 2 bytes/kb)))) - (prelude/assert + (prelude-assert (equal "17MB" (bytes/to-string (* 17 bytes/mb)))) - (prelude/assert + (prelude-assert (equal "419GB" (bytes/to-string (* 419 bytes/gb)))) - (prelude/assert + (prelude-assert (equal "999TB" (bytes/to-string (* 999 bytes/tb)))) - (prelude/assert + (prelude-assert (equal "2PB" (bytes/to-string (* 2 bytes/pb))))) (provide 'bytes) |