diff --git a/DESCRIPTION b/DESCRIPTION index 33d7229d..afb0cc16 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: rapbase Type: Package Title: Base Functions and Resources for Rapporteket -Version: 1.13.2 +Version: 1.13.3 Authors@R: c( person(given = "Are", family = "Edvardsen", diff --git a/NEWS.md b/NEWS.md index 75229dde..c482f96c 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,7 @@ +# rapbase 1.13.3 (#68) + +* Minor adjustment to email subject (header field) format + # rapbase 1.13.2 (#66) * Fixed email encoded subject (header field) split diff --git a/R/sendEmail.R b/R/sendEmail.R index 84533d2b..156257af 100644 --- a/R/sendEmail.R +++ b/R/sendEmail.R @@ -32,12 +32,12 @@ sendEmail <- function(conf, to, subject, text, attFile = NULL) { # escape spaces (e.g. when full name is added to ) to <- gsub(" ", "\\ ", to, fixed = TRUE) # Subject is a header field, hence non-ascii to be base64 encoded - # Header lines must be 76 chars or less and split by a newline + # Header lines must be 76 chars or less and split by a space # and contain consistent encoded-word(s) subject <- charToRaw(subject) subject <- base64enc::base64encode(subject, linewidth = 63) subject <- paste(paste0(charset, enc, subject, headPost), - collapse = "\r\n") + collapse = " ") if (is.null(attFile)) { body <- list(text)