From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 6 May 1996 04:28:32 +0000 (+0000)
Subject: (set_case_table): Set upcase_table, case_canon_table
X-Git-Tag: emacs-19.34~691
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6c6fcbf89bb6a46ed3e1c34bc2a301bb624ad4a5;p=emacs.git

(set_case_table): Set upcase_table, case_canon_table
and case_eqv_table in the buffer.
---

diff --git a/src/casetab.c b/src/casetab.c
index 112910cc09c..f0612fe1b54 100644
--- a/src/casetab.c
+++ b/src/casetab.c
@@ -159,7 +159,12 @@ set_case_table (table, standard)
   if (standard)
     Vascii_downcase_table = table;
   else
-    current_buffer->downcase_table = table;
+    {
+      current_buffer->downcase_table = table;
+      current_buffer->upcase_table = up;
+      current_buffer->case_canon_table = canon;
+      current_buffer->case_eqv_table = eqv;
+    }
 
   return table;
 }