diff options
| author | Richard M. Stallman | 2002-06-03 22:44:31 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-06-03 22:44:31 +0000 |
| commit | 5b6d51b6e89cf9f35cef15e2c30f66a4a19b6fd4 (patch) | |
| tree | 0ba154f62183416be15595f06091a359ff9e8bbe /src | |
| parent | 1e59646d69096aca54f96acf0099f74f652c4a09 (diff) | |
| download | emacs-5b6d51b6e89cf9f35cef15e2c30f66a4a19b6fd4.tar.gz emacs-5b6d51b6e89cf9f35cef15e2c30f66a4a19b6fd4.zip | |
(message_with_string): Error if STRING is not a string.
Diffstat (limited to 'src')
| -rw-r--r-- | src/xdisp.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/xdisp.c b/src/xdisp.c index a6870316e0c..155602e2b4a 100644 --- a/src/xdisp.c +++ b/src/xdisp.c | |||
| @@ -6053,6 +6053,8 @@ message_with_string (m, string, log) | |||
| 6053 | Lisp_Object string; | 6053 | Lisp_Object string; |
| 6054 | int log; | 6054 | int log; |
| 6055 | { | 6055 | { |
| 6056 | CHECK_STRING (string); | ||
| 6057 | |||
| 6056 | if (noninteractive) | 6058 | if (noninteractive) |
| 6057 | { | 6059 | { |
| 6058 | if (m) | 6060 | if (m) |