Mercurial > emacs

changeset 51038:0b084ee4c1c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(map_char_table): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 May 2003 15:49:42 +0000
parents 7951cc19aaf1
children e7e3f38afa3e
files src/fns.c
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Sat May 17 12:50:31 2003 +0000
+++ b/src/fns.c	Sat May 17 15:49:42 2003 +0000
@@ -2697,13 +2697,15 @@
 	{
 	  int c1, c2, c;
 
+	  c1 = depth >= 1 ? XFASTINT (indices[1]) : 0;
+	  c2 = depth >= 2 ? XFASTINT (indices[2]) : 0;
+	  c = MAKE_CHAR (charset, c1, c2);
+
 	  if (NILP (elt))
 	    elt = XCHAR_TABLE (subtable)->defalt;
 	  if (NILP  (elt))
-	    elt = Faref (table, make_number (i));
-	  c1 = depth >= 1 ? XFASTINT (indices[1]) : 0;
-	  c2 = depth >= 2 ? XFASTINT (indices[2]) : 0;
-	  c = MAKE_CHAR (charset, c1, c2);
+	    elt = Faref (table, make_number (c));
+
 	  if (c_function)
 	    (*c_function) (arg, make_number (c), elt);
 	  else