Merge pull request #155 from ljwoodley/include_email_content

Include email content
ctsit · Mar 25, 2024 · 2a0ea1c · 2a0ea1c
2 parents 13abced + b3de437
commit 2a0ea1c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/logging.R b/R/logging.R
@@ -689,9 +689,10 @@ send_email <-
       email_to <- unlist(strsplit(email_to, " "))
     }
 
+    email_content <- list(email_body)
+
     if (!is.null(file_name)) {
       output_dir <- tempdir()
-      email_content <- list()
 
       if (!is.null(df_to_email) && is.data.frame(df_to_email)) {
         df_to_email <- list(df_to_email)