diff options
Diffstat (limited to 'src/eval.c')
-rw-r--r-- | src/eval.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index 938b20cd824..69ce3f35c54 100644 --- a/src/eval.c +++ b/src/eval.c @@ -2017,6 +2017,20 @@ run_hook_list_with_args (funlist, nargs, args) UNGCPRO; return Qnil; } + +/* Run the hook HOOK, giving each function the two args ARG1 and ARG2. */ + +void +run_hook_with_args_2 (hook, arg1, arg2) + Lisp_Object hook, arg1, arg2; +{ + Lisp_Object temp[3]; + temp[0] = hook; + temp[1] = arg1; + temp[2] = arg2; + + Frun_hook_with_args (3, temp); +} /* Apply fn to arg */ Lisp_Object |