diff options
author | Eli Zaretskii <eliz@gnu.org> | 2022-07-28 21:41:15 +0300 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2022-07-28 21:41:15 +0300 |
commit | dc96fe5c101a4e1b0a332497c94c021bf7be4ce1 (patch) | |
tree | f422bbedc31d01ab14f184023f7b523a9b6f1b94 /test/lisp/subr-tests.el | |
parent | eeeb481750b5cec264af0f4ea5298cae011e5050 (diff) | |
download | emacs-dc96fe5c101a4e1b0a332497c94c021bf7be4ce1.tar.gz emacs-dc96fe5c101a4e1b0a332497c94c021bf7be4ce1.tar.bz2 emacs-dc96fe5c101a4e1b0a332497c94c021bf7be4ce1.zip |
; * test/lisp/subr-tests.el (string-comparison-test): Add more tests.
Diffstat (limited to 'test/lisp/subr-tests.el')
-rw-r--r-- | test/lisp/subr-tests.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test/lisp/subr-tests.el b/test/lisp/subr-tests.el index 6df4a469326..be613ce7595 100644 --- a/test/lisp/subr-tests.el +++ b/test/lisp/subr-tests.el @@ -374,6 +374,8 @@ (should-not (string-equal-ignore-case "abc" "abCD")) (should (string-equal-ignore-case "S" "s")) (should (string-equal-ignore-case "ẞ" "ß")) + (should (string-equal-ignore-case "Dz" "DZ")) + (should (string-equal-ignore-case "Όσος" "ΌΣΟΣ")) ;; not yet: (should (string-equal-ignore-case "SS" "ß")) ;; not yet: (should (string-equal-ignore-case "SS" "ẞ")) |