add_attachment blastula not attaching

ok, found the problem. I had to write the output of the add_attachment function back into the email dataset.

test <- "h:/test.txt"
email <- add_attachment(
  email,
  test,
  content_type = mime::guess_type(test),
  filename = basename(test)
)