Mercurial > emacs
changeset 11995:ea774a7c610c
(after-revert-hook, before-revert-hook): Add defvars.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Mon, 29 May 1995 19:42:42 +0000 |
parents | b4dd8ca308dd |
children | d330b9cd3529 |
files | lisp/files.el |
diffstat | 1 files changed, 14 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Mon May 29 19:41:18 1995 +0000 +++ b/lisp/files.el Mon May 29 19:42:42 1995 +0000 @@ -1952,6 +1952,20 @@ 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.