Function: shr-mark-fill

shr-mark-fill is a byte-compiled function defined in shr.el.gz.

Signature

(shr-mark-fill START)

Source Code

;; Defined in /usr/src/emacs/lisp/net/shr.el.gz
(defun shr-mark-fill (start)
  ;; We may not have inserted any text to fill.
  (when (and (/= start (point))
             ;; Tables insert themselves with the correct indentation,
             ;; so don't do anything if we're at the start of a table.
             (not (get-text-property start 'shr-table-id)))
    (put-text-property start (1+ start)
		       'shr-indentation shr-indentation)))