From 5b6d51b6e89cf9f35cef15e2c30f66a4a19b6fd4 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Mon, 3 Jun 2002 22:44:31 +0000
Subject: [PATCH] (message_with_string): Error if STRING is not a string.

---
 src/xdisp.c | 2 ++
 1 file changed, 2 insertions(+)

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)
      Lisp_Object string;
      int log;
 {
+  CHECK_STRING (string);
+
   if (noninteractive)
     {
       if (m)
-- 
2.39.2