change text of email (email sent)

reminders.R

@@ -43,15 +43,18 @@ for (group in groups){
   emails = paste0(peoplelist_group$email, collapse = ",")
   text_mail = "
   
-As explained in my previous email, we want to present each project on the sfb1315-output.de website. 
-I think it would be good if you could indicate one person of contact for the creation of the project page, so that my future emails do not go to all of you. 
+As explained in my previous email, we want to present each project and each researcher on the sfb1315-output.de website. 
 
-Note that if you have no time to create a figure with Thomas Splettstoesser before the website launch, we will need to use another image as a thumbnail.
+It would be more efficient if you could indicate one person of contact for the creation of the project page, so that my future emails do not go to all of you. 
+(Note that if you have no time to create a figure with Thomas Splettstoesser before the website launch, we will need to use another image as a thumbnail.)
 
-Best regards,
+For the personal pages, I need you to get and update your orcid profile (see https://www.sfb1315-output.de/post/using-orcid/). 
+
+
+Best regards and stay safe,
 "
   text =paste0("<a href='mailto:", emails,
-               "?subject=SFB1315-output.de&body=Dear members of project ",group,",", gsub('&NewLine;','%0D%0A',textutils::HTMLencode(text_mail))
+               "?subject=making SFB1315-output.de awesome&body=Dear members of project ",group,",", gsub('&NewLine;','%0D%0A',textutils::HTMLencode(text_mail))
                ," '> ",
                group," </a>")