branch: master commit 387cb55e4c8d43084d68ca7e16809f93717277e3 Author: Michael Heerdegen <michael_heerde...@web.de> Commit: Michael Heerdegen <michael_heerde...@web.de>
add on-screen-unload-function --- on-screen.el | 8 ++++++++ 1 files changed, 8 insertions(+), 0 deletions(-) diff --git a/on-screen.el b/on-screen.el index 08048bb..25d8335 100644 --- a/on-screen.el +++ b/on-screen.el @@ -659,6 +659,14 @@ highlightings and clear all associated data." (add-hook 'window-configuration-change-hook #'on-screen-after-wconf-change) (setq on-screen-initialized-p t)) +(defun on-screen-unload-function () + "Function to run when unloading on-screen." + (remove-hook 'pre-command-hook #'on-screen-pre-command) + (remove-hook 'window-scroll-functions #'on-screen-after-scroll) + (remove-hook 'after-change-functions #'on-screen-after-change) + (remove-hook 'window-configuration-change-hook #'on-screen-after-wconf-change) + nil) + (provide 'on-screen)