https://github.com/larsbrinkhoff/emacs-history has the details... there's some Gosling code (notably display.c with the skull-and-bones warning) in Emacs 13, but none that I can find in 15 and later.