From 538482abd949a7ffdec17544c5f67612a3f4d1ba Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Tue, 18 Dec 2001 19:38:18 +0000
Subject: [PATCH] (Fdefine_charset): Call Fupdate_coding_systems_internal.

---
 src/charset.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/charset.c b/src/charset.c
index 2d5c3b75c81..5ff3be8c9a4 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -708,6 +708,7 @@ DESCRIPTION (string) is the description string of the charset.  */)
   Fput (charset_symbol, Qcharset, CHARSET_TABLE_ENTRY (XINT (charset_id)));
   CHARSET_SYMBOL (XINT (charset_id)) = charset_symbol;
   Vcharset_list = Fcons (charset_symbol, Vcharset_list);
+  Fupdate_coding_systems_internal ();
   return Qnil;
 }
 
-- 
2.39.2