[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master c8b72ad: Add more dired-x tests
From: |
Eli Zaretskii |
Subject: |
master c8b72ad: Add more dired-x tests |
Date: |
Fri, 3 Dec 2021 14:53:30 -0500 (EST) |
branch: master
commit c8b72ad0eaf63cfe73542b6014e76a2111df6820
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>
Add more dired-x tests
* test/lisp/dired-x-tests.el (dired-x--string-to-number): Add more
tests with various thousands separators.
---
test/lisp/dired-x-tests.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/test/lisp/dired-x-tests.el b/test/lisp/dired-x-tests.el
index c6ac7c6..69c88c0 100644
--- a/test/lisp/dired-x-tests.el
+++ b/test/lisp/dired-x-tests.el
@@ -65,7 +65,10 @@
(should (= (dired-x--string-to-number "2400") 2400))
(should (= (dired-x--string-to-number "123.4M") 129394278.4))
(should (= (dired-x--string-to-number "123.40000M") 129394278.4))
- (should (= (dired-x--string-to-number "4.134") 4134)))
+ (should (= (dired-x--string-to-number "4.134") 4134))
+ (should (= (dired-x--string-to-number "4,134") 4134))
+ (should (= (dired-x--string-to-number "4 134") 4134))
+ (should (= (dired-x--string-to-number "41,52,134") 4152134)))
(provide 'dired-x-tests)
;;; dired-x-tests.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master c8b72ad: Add more dired-x tests,
Eli Zaretskii <=