Am 04.09.2010 12:36, schrieb Eli Zaretskii:
>> Date: Sat, 04 Sep 2010 11:50:01 +0200
>> From: Andreas Röhler<andreas.roehler@easy-emacs.de>
>> CC: 6971-done@debbugs.gnu.org
>>
>> I'm pretty sure everything was fine with the but-last entry below
>> (setq mon (list ...
>>
>> Maybe this entry and/or execution it inside did the corruption:
>>
>> (insert (list (read-from-string (format "%s" α))
>
> This one errors out.
>
>> (setq mon (list "Januar" "Februar" "März" "April" "Mai" "Juni" "Juli"
>> "August" "September" "Oktober"   "November" "Dezember"))
>> Mai
>> \,(pop mon)
>
> I don't see anything here that could have caused corruption.  And note
> that these parts of your file are perfectly fine.
>

Only in thunderbird, see screenshot attached.

If thunderbird displays the pasted code correctly,
doesn't it indicate a bug in Emacs?

BTW pasting from thunderbird might be well considered as a possible trigger.