; * test/lisp/subr-tests.el (string-comparison-test): Add more tests.

This commit is contained in:
Eli Zaretskii 2022-07-28 21:41:15 +03:00
parent eeeb481750
commit dc96fe5c10

View file

@ -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" "ẞ"))