>> "Adam" == Adam Sjøgren writes: > On Tue, 08 Jan 2013 21:54:43 +0100, Uwe wrote: >> (add-to-list 'mm-inline-media-tests '("text/calendar" mm-inline-text-calendar identity)) > Ok. One function explained. > You cut the part of the code where the second function is used, so I'll > bring that snippet back: > (defun mm-inline-text-calendar (handle) > (let ((text "")) > (with-temp-buffer > (mm-insert-part handle) > (save-window-excursion > (setq info (mapcar (lambda (s) (mm-decode-string s "utf-8")) > (format-text-calendar-for-display (icalendar--read-element nil nil)))))) > See? The second function is used by the first :-) oops, right, sorry Uwe