From: Richard M. Stallman Date: Mon, 28 Aug 1995 15:15:28 +0000 (+0000) Subject: (basic-save-buffer): Doc fix. X-Git-Tag: emacs-19.34~2897 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1cc852cc966516ba2daae60c69a17e099d70d7c3;p=emacs.git (basic-save-buffer): Doc fix. (after-save-hook): Add defvar. --- diff --git a/lisp/files.el b/lisp/files.el index 8cb1a66183a..64f33c58e2f 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1691,8 +1691,12 @@ the last real save, but optional arg FORCE non-nil means delete anyway." (file-error nil)) (set-buffer-auto-saved)))) +(defvar after-save-hook nil + "Normal hook that is run after a buffer is saved to its file.") + (defun basic-save-buffer () - "Save the current buffer in its visited file, if it has been modified." + "Save the current buffer in its visited file, if it has been modified. +After saving the buffer, run `after-save-hook'." (interactive) (save-excursion ;; In an indirect buffer, save its base buffer instead.