diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-03-27 04:20:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-03-27 04:20:05 +0000 |
| commit | c34beca9541463bc8cc1aad6e4d295ef210fc81d (patch) | |
| tree | 43155695b71c8d2bf5d4d8dd8c28a16925bfe412 | |
| parent | 08159178ca75f2b6fb226988e1905849d7906f3a (diff) | |
| download | emacs-c34beca9541463bc8cc1aad6e4d295ef210fc81d.tar.gz emacs-c34beca9541463bc8cc1aad6e4d295ef210fc81d.tar.bz2 emacs-c34beca9541463bc8cc1aad6e4d295ef210fc81d.zip | |
(Fchar_equal): Don't ignore high bits of character.
| -rw-r--r-- | src/editfns.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/editfns.c b/src/editfns.c index d936dc4cdb6..99365930c23 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -1416,7 +1416,8 @@ Case is ignored if `case-fold-search' is non-nil in the current buffer.") CHECK_NUMBER (c2, 1); if (!NILP (current_buffer->case_fold_search) - ? downcase[0xff & XFASTINT (c1)] == downcase[0xff & XFASTINT (c2)] + ? (downcase[0xff & XFASTINT (c1)] == downcase[0xff & XFASTINT (c2)] + && (XFASTINT (c1) & ~0xff) == (XFASTINT (c2) & ~0xff)) : XINT (c1) == XINT (c2)) return Qt; return Qnil; |