Re: Upcoming loss of usability of Emacs source files and Emacs.

[Ulrich Mueller]

>>>>> On Thu, 18 Jun 2015, Eli Zaretskii wrote:

>> >> ;; Ignore accent and umlaut marks when searching.
>> >> ;; Works for Emacs 19.30 and later.
>> >> (let ((eqv-list '("aAàÀáÁâÂãÃäÄåÅ"
>> >>             "cCçÇ"
>> >>             "eEèÈéÉêÊëË"
>> >>             "iIìÌíÍîÎïÏ"
>> >>             "nNñÑ"
>> >>             "oOòÒóÓôÔõÕöÖøØ"
>> >>             "uUùÙúÚûÛüÜ"
>> >>             "yYýÝÿ"))
>> >>       (table (standard-case-table))
>> >>       canon)
>> >>   (setq canon (copy-sequence table))
>> >>   (mapcar (lambda (s)
>> >>       (mapcar (lambda (c) (aset canon c (aref s 0))) s))
>> >>     eqv-list)
>> >>   (set-char-table-extra-slot table 1 canon)
>> >>   (set-char-table-extra-slot table 2 nil)
>> >>   (set-standard-case-table table))

> Btw, the above doesn't work at all for me in Emacs 25: searching for
> 'a' doesn't find the variants with diacriticals. Maybe I didn't use
> it correctly -- is something else required beyond evaluating the
> expression and making sure I-search does a case-insensitive search?

It should still work with Emacs from git master of today. But I guess
an additional (set-case-table (standard-case-table)) is needed when
evaluating it in an existing buffer.

Ulrich