Mercurial > emacs
changeset 42410:cd63104dd575
* abbrev.c (Fexpand_abbrev): Use NILP instead of implicit zero
comparison to test lisp value returned by Fget.
| author | Ken Raeburn <raeburn@raeburn.org> |
|---|---|
| date | Sat, 29 Dec 2001 21:42:22 +0000 |
| parents | e4bc19536f88 |
| children | c67f88ae0e05 |
| files | src/ChangeLog src/abbrev.c |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Sat Dec 29 20:31:31 2001 +0000 +++ b/src/ChangeLog Sat Dec 29 21:42:22 2001 +0000 @@ -1,3 +1,8 @@ +2001-12-29 Ken Raeburn <raeburn@gnu.org> + + * abbrev.c (Fexpand_abbrev): Use NILP instead of implicit zero + comparison to test lisp value returned by Fget. + 2001-12-29 Richard M. Stallman <rms@gnu.org> * fileio.c (Fdo_auto_save): If NO_MESSAGE, don't call push_message.
--- a/src/abbrev.c Sat Dec 29 20:31:31 2001 +0000 +++ b/src/abbrev.c Sat Dec 29 21:42:22 2001 +0000 @@ -331,7 +331,7 @@ if (INTEGERP (XSYMBOL (sym)->plist)) XSETINT (XSYMBOL (sym)->plist, XINT (XSYMBOL (sym)->plist) + 1); - else if (tem = Fget (sym, Qcount)) + else if (!NILP (tem = Fget (sym, Qcount))) Fput (sym, Qcount, make_number (XINT (tem) + 1)); /* If this abbrev has an expansion, delete the abbrev