Function: rng-error-modified

rng-error-modified is a byte-compiled function defined in rng-valid.el.gz.

Signature

(rng-error-modified OVERLAY AFTER-P BEG END &optional PRE-CHANGE-LEN)

Source Code

;; Defined in /usr/src/emacs/lisp/nxml/rng-valid.el.gz
;; If we don't do this, then the front delimiter can move
;; past the end delimiter.
(defun rng-error-modified (overlay after-p _beg _end &optional _pre-change-len)
  (when (and after-p
	     (overlay-start overlay)	; check not deleted
	     (>= (overlay-start overlay)
		 (overlay-end overlay)))
    (let ((inhibit-quit t))
      (delete-overlay overlay)
      (setq rng-error-count (1- rng-error-count)))))