From: Karl Heuer Date: Mon, 29 May 1995 19:42:42 +0000 (+0000) Subject: (after-revert-hook, before-revert-hook): Add defvars. X-Git-Tag: emacs-19.34~3863 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5f76e7d492047bd9a96c374bbf61979f990f75cf;p=emacs.git (after-revert-hook, before-revert-hook): Add defvars. --- diff --git a/lisp/files.el b/lisp/files.el index 4b68d391ff5..28e9485b6e6 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1952,6 +1952,20 @@ which are the arguments that `revert-buffer' received.") Gets two args, first the nominal file name to use, and second, t if reading the auto-save file.") +(defvar before-revert-hook nil + "Normal hook for `revert-buffer' to run before reverting. +If `revert-buffer-function' is used to override the normal revert +mechanism, this hook is not used.") + +(defvar after-revert-hook nil + "Normal hook for `revert-buffer' to run after reverting. +Note that the hook value that it runs is the value that was in effect +before reverting; that makes a difference if you have buffer-local +hook functions. + +If `revert-buffer-function' is used to override the normal revert +mechanism, this hook is not used.") + (defun revert-buffer (&optional ignore-auto noconfirm) "Replace the buffer text with the text of the visited file on disk. This undoes all changes since the file was visited or saved.