bug#16796: 24.3.50; global value of after-change-functions reset without error

[Michael Heerdegen]

Alex <agrambot@gmail.com> writes:

> > (progn
> >   
> >   (defun foo (&rest _) ())
> >   
> >   (add-hook 'after-change-functions 'foo)
> >   
> >   (defun complain ()
> >     (when (not (memq 'foo (default-value 'after-change-functions)))
> >       (message "Why does this happen?")
> >       (cancel-timer complain-timer)))
> >   
> >   (defvar complain-timer
> >     (run-with-idle-timer .03 .03 #'complain))
> >
> >   (require 'cl-lib)
> >   (global-set-key
> >    [f9]
> >    (lambda () (interactive)
> >      (completing-read
> >       "Hit tab and C-g:  "
> >       (cl-loop for i from 1 to 100000
> >            collect (format "%d" i))))))
> >
> > Hit f9 and C-g one or two times.  I get "Why does this happen?", but not
> > always.  If I repeat the test several times, I'll always happen sooner
> > or later.
>
> I can reproduce this on 24.5 but not in 25.1. Can you reproduce this
> on 25.1 or up?

No, seems I can't reproduce it with 25.1.  I guess we can close this and
cross our fingers.

Michael.