bug#35689: Customizable char-fold

[Noam Postavsky]

Juri Linkov <juri@linkov.net> writes:

> Oh, right.  Do you see a problem with a better patch:

> +(eval-and-compile (defcustom char-fold-include-base nil
> +  "Include mappings from composite character to base letter."
> +  :type 'boolean
> +  :set (lambda (sym val)
> +         (set sym val)
> +         (when (boundp 'char-fold-table)
> +           (setq char-fold-table (char-fold-make-table))))

Looks like it could work (though I haven't tested).  The docstrings are
too terse for me easily follow, and they should probably include
something along the lines of "Setting this variable directly does not
take effect; either use M-x customize or ..."