Function: gnus-put-overlay-excluding-newlines

gnus-put-overlay-excluding-newlines is a byte-compiled function defined in gnus-util.el.gz.

Signature

(gnus-put-overlay-excluding-newlines BEG END PROP VAL)

Documentation

Like put-text-property, but don't put this prop on any newlines in the region.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-util.el.gz
(defsubst gnus-put-overlay-excluding-newlines (beg end prop val)
  "Like `put-text-property', but don't put this prop on any newlines in the region."
  (save-match-data
    (save-excursion
      (save-restriction
	(goto-char beg)
	(while (re-search-forward gnus-emphasize-whitespace-regexp end 'move)
	  (overlay-put (make-overlay beg (match-beginning 0)) prop val)
	  (setq beg (point)))
	(overlay-put (make-overlay beg (point)) prop val)))))