Function: textsec-covering-scripts

textsec-covering-scripts is a byte-compiled function defined in textsec.el.gz.

Signature

(textsec-covering-scripts STRING)

Documentation

Return a minimal list of scripts used in STRING.

Note that a string may have several different minimal cover sets. 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-covering-scripts (string)
  "Return a minimal list of scripts used in STRING.
Note that a string may have several different minimal cover sets.
The scripts are as defined by the Unicode Standard Annex 24 (UAX#24)."
  (let* ((scripts (textsec-scripts string))
         (set (car scripts)))
    (dolist (s scripts)
      (setq set (seq-union set (seq-difference s set))))
    (sort (delq 'common (delq 'inherited set)) #'string<)))