Re: my attach this buffer

[Uwe Brauer <oub@mat.ucm.es>]

>>> "EB" == Emanuel Berg <moasenwood@zoho.eu> writes:

> Uwe Brauer wrote:
>>> You could try `mailcap-file-name-to-mime-type' on the file
>>> name, and see if that gets it right often enough to
>>> be useful.
>> 
>> Hm I tried (mailcap-file-name-to-mime-type (buffer-file-name
>> current-buffer)) but that did not work
>> 
>> I mean 
>> 
>> (defun my-attach-this-buffer ()
>> "Send the whole buffer, funny to note that such a function does not exist."
>> (interactive)
>> (let  ((src-buf (buffer-file-name (current-buffer))))
>> (let ((my-mime (mailcap-file-name-to-mime-type (buffer-file-name current-buffer))))
>> (gnus-summary-post-news)
>> (mail-text)
>> (mml-attach-buffer src-buf my-mime nil nil)
>> (message-goto-to))))
>> 
>> But it did not work

> Are you kidding? :O

> Straight gangsta!

> (require 'gnus-msg)
> (require 'mailcap)
> (require 'message)
> (require 'mml)
> (require 'sndmail)

> (defun mail-attach-buffer ()
>   (interactive)
>   (let*((buf  (buffer-file-name (current-buffer)))
>         (mime (mailcap-file-name-to-mime-type buf)) )
>     (gnus-summary-post-news)
>     (mail-text)
>     (mml-attach-buffer buf mime)
>     (message-goto-to) ))

Thanks, misplaced brackets and let instead of let*, I copied that code
from another one badly.

Strangely enough if I fire that function in a matlab file
I obtain

#part buffer="/home/oub/Annu-Matlab2021/file.m"
#/part

So mail-cap-file-name-to-mime-type does not work, even though
"text/x-matlab"

Seems a recognised type. Maybe that is a bug