bug#73386: [PATCH] Fix keybinding support for *-auto-reveal

[Arash Esbati]

Paul Nelson <ultrono@gmail.com> writes:

>> Thanks.  I have one question: Is it possible to set the LEXICAL argument
>> of `eval' to t?
>
> If I understand correctly, your suggestion is to use something like
> the following?

Yes, plus the one addition below.

> (defcustom preview-auto-reveal
>       '(eval . ((apply #'preview-arrived-via
>                        (mapcar (lambda (cmd)
>                                  (if (and (listp cmd) (eq (car cmd) 
> 'key-binding))
>                                      (eval cmd)
                                       (eval cmd t)
>                                    cmd))
>                                preview-auto-reveal-commands))
>                 t))
> ...)
>
> I assume this will have no effect, but would be happy to test it out
> for a couple days.

Great, thanks, looking forward to your feedback.

Best, Arash