[bug-mailutils] Scheme procedure mu-message-copy

[Chris Hall]

Hello,

I use rss2email so I can quickly use RSS feeds from a smartphone mail reader.

I need to sort those feed messages into appropriate  IMAP folders as they arrive.

But I can't seem to get Guile/Scheme procedure mu-message copy to work -- am I doing something wrong?

To reproduce this:

(use-modules (mailutils mailutils))

(define source-mbox (mu-mailbox-open "mbox:///every/mbox/file/ive/tried/mbox" "rw"))

(define msg-in (mu-mailbox-get-message source-mbox 1))

scheme@(guile-user)> (mu-message-get-lines msg-in)

$1 = 65

(define msg-out (mu-message-copy msg-in))

scheme@(guile-user)> (mu-message-get-lines msg-out)

$2 = 1

(mu-message-set-header msg-out "X-Filed-By" "Guile" #t)

(mu-mailbox-append-message source-mbox msg-out)

(mu-mailbox-close source-mbox)

I have had a close look(s) at libmu_scm/mu_message.c and libmailutils/stream/streamcpy.c, but everything looks fine to me.  I'm thinking that a) I'm doing something wrong and/or b) its some subtlety in the SCM SMOB shuffling that I'm missing. 

Obviously mu_stream_copy is going to be much more efficient, but if I needed to copy a MIME message (and right now I don't), I can't even see how to set MIME parts in a new message from Guile.  Am I missing it?