From 996d076f15909931ede170b2df82a135222217a4 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 3 Feb 2025 15:50:36 -0500 Subject: [PATCH] * lisp/emacs-lisp/track-changes.el (track-changes-fetch): Fix bug#75906 (cherry picked from commit 1c3a8bc9b51cf89fc1eff181d39941d7f0c7b2e2) --- lisp/emacs-lisp/track-changes.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/track-changes.el b/lisp/emacs-lisp/track-changes.el index 25c9ad7c859..125314fa814 100644 --- a/lisp/emacs-lisp/track-changes.el +++ b/lisp/emacs-lisp/track-changes.el @@ -372,7 +372,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. -- 2.39.5