Commit d3ac3534 authored by Andrea Corallo's avatar Andrea Corallo

Revert "* src/comp.c (Fcomp__register_subr): Remove code duplication using Fdefalias."

This reverts commit 6c7f615a.
parent 0ce4bf3e
Pipeline #5965 failed with stage
in 91 minutes and 36 seconds
......@@ -4787,7 +4787,17 @@ DEFUN ("comp--register-subr", Fcomp__register_subr, Scomp__register_subr,
Lisp_Object tem =
make_subr (SYMBOL_NAME (name), minarg, maxarg, c_name, doc_idx, intspec,
comp_u);
Fdefalias (name, tem, Qnil);
LOADHIST_ATTACH (Fcons (Qdefun, name));
{ /* Handle automatic advice activation (bug#42038).
See `defalias'. */
Lisp_Object hook = Fget (name, Qdefalias_fset_function);
if (!NILP (hook))
call2 (hook, name, tem);
else
Ffset (name, tem);
}
return tem;
}
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment