From ccd3dad78de103de596c0c3a5791a5cf93d0b92c Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Sun, 28 Apr 2024 15:24:46 +0200 Subject: [PATCH] * src/comp.c (comp_hash_string): Count bytes, not chars. (cherry picked from commit 1e931f1c3db1588ba402d0eab60f03cc036f814a) --- src/comp.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/comp.c b/src/comp.c index 99f51e07048..3ac6896aee1 100644 --- a/src/comp.c +++ b/src/comp.c @@ -744,7 +744,7 @@ static Lisp_Object comp_hash_string (Lisp_Object string) { Lisp_Object digest = make_uninit_string (MD5_DIGEST_SIZE * 2); - md5_buffer (SSDATA (string), SCHARS (string), SSDATA (digest)); + md5_buffer (SSDATA (string), SBYTES (string), SSDATA (digest)); hexbuf_digest (SSDATA (digest), SDATA (digest), MD5_DIGEST_SIZE); return Fsubstring (digest, Qnil, make_fixnum (HASH_LENGTH)); -- 2.39.5