Nicolas Goaziou <mail@nicolasgoaziou.fr> writes:

> Hello,
>
> Eric Abrahamsen <eric@ericabrahamsen.net> writes:
>
>> It's amazing what an effect barky compiler errors can have.
>
> Thanks. However, `cl-flet' is not supported in Emacs 23 so it's not an
> option for Org 8.3.
>
> OTOH, most uses of `flet' can be replaced with a plain `lambda' and
> funcalls.
>
>> -    (flet ((mp (p) (org-entry-get nil p org-mime-use-property-inheritance)))
>> +    (cl-flet ((mp (p) (org-entry-get nil p org-mime-use-property-inheritance)))
>>        (let* ((file (buffer-file-name (current-buffer)))
>>  	     (subject (or (mp "MAIL_SUBJECT") (nth 4 (org-heading-components))))
>>  	     (to (mp "MAIL_TO"))
>
>   (let* ((mp (lambda (p) (org-entry-get nil p org-mime-use-property-inheritance))))
>          (file (buffer-file-name (current-buffer)))
>          (subject (or (funcall mp "MAIL_SUBJECT") (nth 4 (org-heading-components))))
>          (to (funcall mp "MAIL_TO"))
>      ...)

That took longer than I expected...