From f5b81cd81dc8e07bb6377fae8a6904191426f893 Mon Sep 17 00:00:00 2001
From: Ken Raeburn <raeburn@raeburn.org>
Date: Tue, 16 Jul 2002 15:48:59 +0000
Subject: [PATCH] * casefiddle.c (casify_object): Use SSET.

---
 src/casefiddle.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/casefiddle.c b/src/casefiddle.c
index 78c3bb2e8c7..67862365a30 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -90,7 +90,7 @@ casify_object (flag, obj)
 		  : ! SINGLE_BYTE_CHAR_P (c))
 		break;
 
-	      SREF (obj, i) = c;
+	      SSET (obj, i, c);
 	      if ((int) flag >= (int) CASE_CAPITALIZE)
 		inword = SYNTAX (c) == Sword;
 	      i++;
-- 
2.39.5