[Emacs-diffs] Changes to emacs/src/fns.c

[Richard M. Stallman]

Index: emacs/src/fns.c
diff -c emacs/src/fns.c:1.337 emacs/src/fns.c:1.338
*** emacs/src/fns.c:1.337       Sat May 17 08:45:52 2003
--- emacs/src/fns.c     Sat May 17 11:49:42 2003
***************
*** 2697,2709 ****
        {
          int c1, c2, c;
  
-         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);
          if (c_function)
            (*c_function) (arg, make_number (c), elt);
          else
--- 2697,2711 ----
        {
          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 (c));
+ 
          if (c_function)
            (*c_function) (arg, make_number (c), elt);
          else