Jaki jest prawidłowy zamiennik fletu na nowym emacsen?

Mam trochę kodu , fletktóry tymczasowo zmienia zachowanie funkcji. ;; prevent changing the window (flet ((pop-to-buffer (buffer &rest args) (switch-to-buffer buffer))) (compilation-next-error-function n reset)) Jednak kompilator bajtów Emacsa ostrzega: In