diff options
| author | Julien Danjou <julien@danjou.info> | 2011-03-23 11:06:57 +0100 |
|---|---|---|
| committer | Julien Danjou <julien@danjou.info> | 2011-03-23 11:06:57 +0100 |
| commit | dee091a37f6486dbbcf7bf00f6ee54d77033f997 (patch) | |
| tree | 922b3490e04f512f9664ca350102d57a18296680 /src/fileio.c | |
| parent | 904a432cf44c176fa3c88a975f046d0cf2992023 (diff) | |
| download | emacs-dee091a37f6486dbbcf7bf00f6ee54d77033f997.tar.gz emacs-dee091a37f6486dbbcf7bf00f6ee54d77033f997.tar.bz2 emacs-dee091a37f6486dbbcf7bf00f6ee54d77033f997.zip | |
Use Frun_hooks rather than calling Vrun_hooks manually
Diffstat (limited to 'src/fileio.c')
| -rw-r--r-- | src/fileio.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/fileio.c b/src/fileio.c index 7d2f10d517c..64dda0a78e4 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -5180,7 +5180,7 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */) (Lisp_Object no_message, Lisp_Object current_only) { struct buffer *old = current_buffer, *b; - Lisp_Object tail, buf; + Lisp_Object tail, buf, hook; int auto_saved = 0; int do_handled_files; Lisp_Object oquit; @@ -5210,8 +5210,8 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */) /* No GCPRO needed, because (when it matters) all Lisp_Object variables point to non-strings reached from Vbuffer_alist. */ - if (!NILP (Vrun_hooks)) - call1 (Vrun_hooks, intern ("auto-save-hook")); + hook = intern ("auto-save-hook"); + Frun_hooks (1, &hook); if (STRINGP (Vauto_save_list_file_name)) { |