Mercurial > emacs
comparison src/editfns.c @ 46639:8587dd21917c
(Fmessage): Treat "" like nil.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 23 Jul 2002 19:08:14 +0000 |
| parents | e05dd5b81fc7 |
| children | 40c8bb63c063 |
comparison
equal
deleted
inserted
replaced
| 46638:b41d86e98fdd | 46639:8587dd21917c |
|---|---|
| 2916 usage: (message STRING &rest ARGS) */) | 2916 usage: (message STRING &rest ARGS) */) |
| 2917 (nargs, args) | 2917 (nargs, args) |
| 2918 int nargs; | 2918 int nargs; |
| 2919 Lisp_Object *args; | 2919 Lisp_Object *args; |
| 2920 { | 2920 { |
| 2921 if (NILP (args[0])) | 2921 if (NILP (args[0]) |
| 2922 || (STRINGP (args[0]) | |
| 2923 && SBYTES (args[0]) == 0)) | |
| 2922 { | 2924 { |
| 2923 message (0); | 2925 message (0); |
| 2924 return Qnil; | 2926 return Qnil; |
| 2925 } | 2927 } |
| 2926 else | 2928 else |