* lisp/emacs-lisp/track-changes.el (track-changes-fetch): Fix bug#75906

This commit is contained in:
Stefan Monnier 2025-02-03 15:50:36 -05:00
parent a3b3083081
commit 1c3a8bc9b5

View file

@ -364,7 +364,9 @@ and re-enable the TRACKER corresponding to ID."
track-changes--state))
;; Nothing to do.
nil)
(cl-assert (not (memq id track-changes--clean-trackers)))
;; ID may still be in `track-changes--clean-trackers' if
;; `after-change-functions' was skipped.
;;(cl-assert (not (memq id track-changes--clean-trackers)))
(cl-assert (<= (point-min) beg end (point-max)))
;; Update the tracker's state *before* running `func' so we don't risk
;; mistakenly replaying the changes in case `func' exits non-locally.