From: Chong Yidong <cyd@stupidchicken.com>
Date: Tue, 9 Jun 2009 18:26:36 +0000 (+0000)
Subject: * process.c (status_message): Fix handling of multibyte signal
X-Git-Tag: emacs-pretest-23.0.95~100
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/0bcbaaaaa8581dc69ddfb7363df3be45c718118f

* process.c (status_message): Fix handling of multibyte signal
string (Bug#3499).
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 1a1068409a..a62284d591 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2009-06-09  Dmitry Dzhus  <dima@sphinx.net.ru>  (tiny change)
+
+	* process.c (status_message): Fix handling of multibyte signal
+	string (Bug#3499).
+
 2009-06-09  Jim Meyering  <meyering@redhat.com>
 
 	* xfaces.c (Fx_load_color_file): Avoid array bounds error if the
diff --git a/src/process.c b/src/process.c
index 5fb3662532..2471ee187b 100644
--- a/src/process.c
+++ b/src/process.c
@@ -464,13 +464,15 @@ status_message (p)
   if (EQ (symbol, Qsignal) || EQ (symbol, Qstop))
     {
       char *signame;
+      int c;
       synchronize_system_messages_locale ();
       signame = strsignal (code);
       if (signame == 0)
 	signame = "unknown";
       string = build_string (signame);
       string2 = build_string (coredump ? " (core dumped)\n" : "\n");
-      SSET (string, 0, DOWNCASE (SREF (string, 0)));
+      c = STRING_CHAR ((char *) SDATA (string), 0);
+      Faset (string, 0, make_number (DOWNCASE (c)));
       return concat2 (string, string2);
     }
   else if (EQ (symbol, Qexit))