Function: faceup-get-text-properties

faceup-get-text-properties is a byte-compiled function defined in faceup.el.gz.

Signature

(faceup-get-text-properties POS)

Documentation

Alist of properties and values at POS.

Face-like properties are normalized -- value is a list of faces (symbols) and short (KEY VALUE) lists. The list is reversed to that later elements take precedence over earlier.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/faceup.el.gz
(defun faceup-get-text-properties (pos)
  "Alist of properties and values at POS.

Face-like properties are normalized -- value is a list of
faces (symbols) and short (KEY VALUE) lists.  The list is
reversed to that later elements take precedence over earlier."
  (let ((res '()))
    (dolist (prop faceup-properties)
      (let ((value (get-text-property pos prop)))
        (when value
          (when (memq prop faceup-face-like-properties)
            ;; Normalize face-like properties.
            (setq value (reverse (faceup-normalize-face-property value))))
          (push (cons prop value) res))))
    res))