Function: fill-text-properties-at

fill-text-properties-at is a byte-compiled function defined in fill.el.gz.

Signature

(fill-text-properties-at POS)

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/fill.el.gz
;; Like text-properties-at but don't include `composition' property.
(defun fill-text-properties-at (pos)
  (let ((l (text-properties-at pos))
	prop-list)
    (while l
      (unless (eq (car l) 'composition)
	(setq prop-list
	      (cons (car l) (cons (cadr l) prop-list))))
      (setq l (cddr l)))
    prop-list))