Function: textsec-single-script-confusable-p
textsec-single-script-confusable-p is a byte-compiled function defined
in textsec.el.gz.
Signature
(textsec-single-script-confusable-p STRING1 STRING2)
Documentation
Say whether STRING1 and STRING2 are single-script confusables.
The scripts are as defined by the Unicode Standard Annex 24 (UAX#24).
Source Code
;; Defined in /usr/src/emacs/lisp/international/textsec.el.gz
(defun textsec-single-script-confusable-p (string1 string2)
"Say whether STRING1 and STRING2 are single-script confusables.
The scripts are as defined by the Unicode Standard Annex 24 (UAX#24)."
(and (equal (textsec-unconfuse-string string1)
(textsec-unconfuse-string string2))
;; And they have to have at least one resolved script in
;; common.
(seq-intersection (textsec-resolved-script-set string1)
(textsec-resolved-script-set string2))))