]> code.delx.au - gnu-emacs/commitdiff
(after-revert-hook, before-revert-hook): Add defvars.
authorKarl Heuer <kwzh@gnu.org>
Mon, 29 May 1995 19:42:42 +0000 (19:42 +0000)
committerKarl Heuer <kwzh@gnu.org>
Mon, 29 May 1995 19:42:42 +0000 (19:42 +0000)
lisp/files.el

index 4b68d391ff5119b13e1675edaf2636dc9396a8e9..28e9485b6e6a21d8b6d9ae71725b74d6fb512d89 100644 (file)
@@ -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.