# HG changeset patch
# User Ken Raeburn <raeburn@raeburn.org>
# Date 1026834588 0
# Node ID db28853d1e82ce35391f177bf74b93087e054ca8
# Parent  2576e1ad86def95b1692961c00c6864f56c64e35
* process.c (status_message): Use SSET.

diff -r 2576e1ad86de -r db28853d1e82 src/process.c
--- a/src/process.c	Tue Jul 16 15:49:44 2002 +0000
+++ b/src/process.c	Tue Jul 16 15:49:48 2002 +0000
@@ -419,7 +419,7 @@
 	signame = "unknown";
       string = build_string (signame);
       string2 = build_string (coredump ? " (core dumped)\n" : "\n");
-      SREF (string, 0) = DOWNCASE (SREF (string, 0));
+      SSET (string, 0, DOWNCASE (SREF (string, 0)));
       return concat2 (string, string2);
     }
   else if (EQ (symbol, Qexit))