diff options
author | Ken Raeburn <raeburn@raeburn.org> | 2001-12-29 21:42:22 +0000 |
---|---|---|
committer | Ken Raeburn <raeburn@raeburn.org> | 2001-12-29 21:42:22 +0000 |
commit | b5cb6072291a4cd2a174eab8c6ef451758de413c (patch) | |
tree | c82faff7896fd26fd4638d11d2cfa5e6a88f6dbe | |
parent | 0d8466cc42d2e35ed1ea136d6862201fba189f21 (diff) | |
download | emacs-b5cb6072291a4cd2a174eab8c6ef451758de413c.tar.gz |
* abbrev.c (Fexpand_abbrev): Use NILP instead of implicit zero
comparison to test lisp value returned by Fget.
-rw-r--r-- | src/ChangeLog | 5 | ||||
-rw-r--r-- | src/abbrev.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index b3fcea180ac..b8a82a2375e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -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. diff --git a/src/abbrev.c b/src/abbrev.c index 217de1c5a6e..3edbe245831 100644 --- a/src/abbrev.c +++ b/src/abbrev.c @@ -331,7 +331,7 @@ Returns the abbrev symbol, if expansion took place. */) 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 |