summaryrefslogtreecommitdiff
path: root/src/minibuf.c
diff options
context:
space:
mode:
authorJulien Danjou <julien@danjou.info>2011-03-23 11:06:57 +0100
committerJulien Danjou <julien@danjou.info>2011-03-23 11:06:57 +0100
commitdee091a37f6486dbbcf7bf00f6ee54d77033f997 (patch)
tree922b3490e04f512f9664ca350102d57a18296680 /src/minibuf.c
parent904a432cf44c176fa3c88a975f046d0cf2992023 (diff)
downloademacs-dee091a37f6486dbbcf7bf00f6ee54d77033f997.tar.gz
emacs-dee091a37f6486dbbcf7bf00f6ee54d77033f997.tar.bz2
emacs-dee091a37f6486dbbcf7bf00f6ee54d77033f997.zip
Use Frun_hooks rather than calling Vrun_hooks manually
Diffstat (limited to 'src/minibuf.c')
-rw-r--r--src/minibuf.c12
1 files changed, 2 insertions, 10 deletions
diff --git a/src/minibuf.c b/src/minibuf.c
index b6b79be9d3f..7bed9bb2f2d 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -649,12 +649,7 @@ read_minibuf (Lisp_Object map, Lisp_Object initial, Lisp_Object prompt,
if (STRINGP (input_method) && !NILP (Ffboundp (Qactivate_input_method)))
call1 (Qactivate_input_method, input_method);
- /* Run our hook, but not if it is empty.
- (run-hooks would do nothing if it is empty,
- but it's important to save time here in the usual case.) */
- if (!NILP (Vminibuffer_setup_hook) && !EQ (Vminibuffer_setup_hook, Qunbound)
- && !NILP (Vrun_hooks))
- call1 (Vrun_hooks, Qminibuffer_setup_hook);
+ Frun_hooks (1, &Qminibuffer_setup_hook);
/* Don't allow the user to undo past this point. */
BVAR (current_buffer, undo_list) = Qnil;
@@ -806,10 +801,7 @@ get_minibuffer (int depth)
static Lisp_Object
run_exit_minibuf_hook (Lisp_Object data)
{
- if (!NILP (Vminibuffer_exit_hook) && !EQ (Vminibuffer_exit_hook, Qunbound)
- && !NILP (Vrun_hooks))
- safe_run_hooks (Qminibuffer_exit_hook);
-
+ safe_run_hooks (Qminibuffer_exit_hook);
return Qnil;
}