From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 6 Sep 2002 16:46:08 +0000 (+0000)
Subject: (set_case_table): Make canon table point to eqv table.
X-Git-Tag: ttn-vms-21-2-B4~13339
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=426f6c23f464e3d2499e1950984c2aa5741b38b7;p=emacs.git

(set_case_table): Make canon table point to eqv table.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index d68ddfb35af..410e537a524 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-06  Richard M. Stallman  <rms@gnu.org>
+
+	* casetab.c (set_case_table): Make canon table point to eqv table.
+
 2002-09-06  Juanma Barranquero  <lektu@terra.es>
 
 	* coding.c (syms_of_coding): Fix spacing.
diff --git a/src/casetab.c b/src/casetab.c
index de504e2e335..6056af54682 100644
--- a/src/casetab.c
+++ b/src/casetab.c
@@ -158,6 +158,9 @@ set_case_table (table, standard)
       XCHAR_TABLE (table)->extras[2] = eqv;
     }
 
+  /* This is so set_image_of_range_1 in regex.c can find the EQV table.  */
+  XCHAR_TABLE (canon)->extras[2] = eqv;
+
   if (standard)
     Vascii_downcase_table = table;
   else