bug#65742: 30.0.50; default-toplevel-value and forwarded symbols

[Gerd Möllmann]

Stefan Monnier <monnier@iro.umontreal.ca> writes:

>> Function default-toplevel-value does not take let-bindings for forwarded
>> symbols into account.
>>
>> (progn
>>   (defvar my-var nil)
>>   (setq my-var t)
>>   (let ((my-var :let))
>>     (default-toplevel-value 'my-var)))
>> => t
>>
>> (progn
>>   (setq lexical-binding t)
>>   (let ((lexical-binding :let))
>>     (default-toplevel-value 'lexical-binding)))
>> => nil
>
> Looks right to me: `lexical-binding` is set buffer-locally by the
> `setq`, so the global/toplevel value is not affected.

Right, I forgot the setq.  How embarrasing.  Closing.