summaryrefslogtreecommitdiff
path: root/test/lisp/files-tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'test/lisp/files-tests.el')
-rw-r--r--test/lisp/files-tests.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el
index df2c3f47ae0..ed23f7675cc 100644
--- a/test/lisp/files-tests.el
+++ b/test/lisp/files-tests.el
@@ -1280,7 +1280,12 @@ renaming only, rather than modified in-place."
(should (equal (file-size-human-readable 4294967296 'iec " ") "4 GiB"))
(should (equal (file-size-human-readable 10000 nil " " "bit") "9.8 kbit"))
(should (equal (file-size-human-readable 10000 'si " " "bit") "10 kbit"))
- (should (equal (file-size-human-readable 10000 'iec " " "bit") "9.8 Kibit")))
+ (should (equal (file-size-human-readable 10000 'iec " " "bit") "9.8 Kibit"))
+
+ (should (equal (file-size-human-readable-iec 0) "0 B"))
+ (should (equal (file-size-human-readable-iec 1) "1 B"))
+ (should (equal (file-size-human-readable-iec 9621) "9.4 KiB"))
+ (should (equal (file-size-human-readable-iec 72528034765) "67.5 GiB")))
(ert-deftest files-test-magic-mode-alist-re-baseline ()
"Test magic-mode-alist with RE, expected behaviour for match."