Mercurial > emacs
changeset 43671:b6abb8a7ea89
(Fexpand_abbrev): Increment plist as use count only if it is an integer.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 03 Mar 2002 20:08:56 +0000 |
parents | 5505d571541b |
children | e26d9755d4e8 |
files | src/abbrev.c |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/abbrev.c Sun Mar 03 20:07:42 2002 +0000 +++ b/src/abbrev.c Sun Mar 03 20:08:56 2002 +0000 @@ -331,7 +331,7 @@ if (INTEGERP (XSYMBOL (sym)->plist)) XSETINT (XSYMBOL (sym)->plist, XINT (XSYMBOL (sym)->plist) + 1); - else if (!NILP (tem = Fget (sym, Qcount))) + else if (INTEGERP (tem = Fget (sym, Qcount))) Fput (sym, Qcount, make_number (XINT (tem) + 1)); /* If this abbrev has an expansion, delete the abbrev