Commit c87dbfd0 authored by Richard M. Stallman's avatar Richard M. Stallman

Comment change.

parent 2d5e9b54
......@@ -367,11 +367,14 @@ Returns the abbrev symbol, if expansion took place.")
{
Lisp_Object expanded, prop;
/* If expanding an abbrev which has only a hook, and the hook
has a non-nil `no-self-insert' property, let the return value
of the hook specify whether an expansion took place. If it
returns nil, no expansion has been done. */
/* If the abbrev has a hook function, run it. */
expanded = call0 (hook);
/* In addition, if the hook function is a symbol with a a
non-nil `no-self-insert' property, let the value it returned
specify whether we consider that an expansion took place. If
it returns nil, no expansion has been done. */
if (SYMBOLP (hook)
&& NILP (expanded)
&& (prop = Fget (hook, intern ("no-self-insert")),
......
......@@ -443,7 +443,7 @@ internal_self_insert (c, noautofill)
sym = Fexpand_abbrev ();
/* If we expanded an abbrev which has only a hook,
/* If we expanded an abbrev which has a hook,
and the hook has a non-nil `no-self-insert' property,
return right away--don't really self-insert. */
if (! NILP (sym) && ! NILP (XSYMBOL (sym)->function)
......
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