Function: startup--rescale-elt-match-p

startup--rescale-elt-match-p is a byte-compiled function defined in startup.el.gz.

Signature

(startup--rescale-elt-match-p FONT-PATTERN FONT-OBJECT)

Documentation

Test whether FONT-OBJECT matches an element of face-font-rescale-alist.

FONT-OBJECT is a font-object that specifies a font to test. FONT-PATTERN is the car of an element of face-font-rescale-alist, which can be either a regexp matching a font name or a font-spec.

Source Code

;; Defined in /usr/src/emacs/lisp/startup.el.gz
(defun startup--rescale-elt-match-p (font-pattern font-object)
  "Test whether FONT-OBJECT matches an element of `face-font-rescale-alist'.
FONT-OBJECT is a font-object that specifies a font to test.
FONT-PATTERN is the car of an element of `face-font-rescale-alist',
which can be either a regexp matching a font name or a font-spec."
  (if (stringp font-pattern)
      ;; FONT-PATTERN is a regexp, we need the name of FONT-OBJECT to match.
      (string-match-p font-pattern (font-xlfd-name font-object))
    ;; FONT-PATTERN is a font-spec.
    (font-match-p font-pattern font-object)))