Function: buffer-substring--filter

buffer-substring--filter is a byte-compiled function defined in simple.el.gz.

Signature

(buffer-substring--filter BEG END &optional DELETE)

Documentation

Default function to use for filter-buffer-substring-function.

Its arguments and return value are as specified for filter-buffer-substring. Also respects the obsolete wrapper hook filter-buffer-substring-functions
(see with-wrapper-hook for details about wrapper hooks),
and the abnormal hook buffer-substring-filters. No filtering is done unless a hook says to.

Source Code

;; Defined in /usr/src/emacs/lisp/simple.el.gz
(defun buffer-substring--filter (beg end &optional delete)
  "Default function to use for `filter-buffer-substring-function'.
Its arguments and return value are as specified for `filter-buffer-substring'.
Also respects the obsolete wrapper hook `filter-buffer-substring-functions'
\(see `with-wrapper-hook' for details about wrapper hooks),
and the abnormal hook `buffer-substring-filters'.
No filtering is done unless a hook says to."
  (subr--with-wrapper-hook-no-warnings
    filter-buffer-substring-functions (beg end delete)
    (cond
     ((or delete buffer-substring-filters)
      (save-excursion
        (goto-char beg)
        (let ((string (if delete (delete-and-extract-region beg end)
                        (buffer-substring beg end))))
          (dolist (filter buffer-substring-filters)
            (setq string (funcall filter string)))
          string)))
     (t
      (buffer-substring beg end)))))