Add upload email

1 files changed, 73 insertions, 4 deletions

diff --git a/2022/organizers-notebook/index.org b/2022/organizers-notebook/index.org
index d15b5cd9..b1a94488 100644
--- a/2022/organizers-notebook/index.org
+++ b/2022/organizers-notebook/index.org
@@ -112,13 +112,13 @@ interests you!
 Ordered chronologically (and therefore by importance).
 
 #+TOC: headlines 1 local
-** TODO Send program-published email for emacsconf-discuss :needsowner:timesensitive:email:
+** TODO Send schedule-published email for emacsconf-discuss :needsowner:timesensitive:email:
 DEADLINE: <2022-10-15 Sat> SCHEDULED: <2022-10-15 Sat>
 :PROPERTIES:
 :CUSTOM_ID: announce-program
 :END:
 
-Schedule is now available
+Schedule is now available; post to emacsconf-discuss, emacs-tangents
 *** TODO Post it to r/emacs as well                           :reddit:zaeph:
 Please let zaeph know when it’s live so that the post can be distinguished.
 
@@ -162,11 +162,80 @@ P.S. please direct all replies to this post either to myself or to the
 emacsconf-discuss list, so as to help avoid generating extra off-topic
 chatter in the other lists cc'd in this message; thank you.
 
-** BLOCKED Prepare email for nudging speakers to send prerec, and inform on upload workflow :timesensitive:needsowner:
+** TODO Prepare email for nudging speakers to send prerec, and inform on upload workflow :timesensitive:needsowner:
 :PROPERTIES:
 :CUSTOM_ID: mail-upload
 :END:
-Blocked by [[*Figure out web-based file upload][Figure out web-based file upload]]
+
+*** Code
+
+#+begin_src emacs-lisp
+(defun emacsconf-mail-upload (group &optional template)
+  "Send upload instructions and reminder.
+GROUP is (email . (talk talk))"
+  (interactive (list (emacsconf-mail-complete-email-group)))
+  (require 'emacsconf-ical)
+  (let ((action-date (date-to-time "2022-11-04")))
+    (emacsconf-mail-prepare
+     (or template (emacsconf-mail-merge-get-template "upload"))
+     group
+     (list
+      :slugs (mapconcat (lambda (o) (plist-get o :slug)) (cdr group) " or ")
+      :speakers-short (plist-get (cadr group) :speakers-short)
+      :plural (if (= (length (cdr group)) 1) "" "s")
+      :email (plist-get (cadr group) :email)
+      :year (or (plist-get (cadr group) :year) emacsconf-year)
+      :prerec-note (emacsconf-surround
+                    (make-string 64 ?-)
+                    (string-join (seq-uniq (mapcar
+                                            (lambda (o)
+                                              (plist-get o :prerec-note))
+                                            (cdr group)))
+                                 "\n")
+                    (make-string 64 ?-)
+                    "")))))
+#+end_src
+
+*** Template
+:PROPERTIES:
+:EMAIL_ID: upload
+:FUNCTION: emacsconf-mail-upload
+:SUBJECT: EmacsConf upload instructions
+:REPLY_TO: emacsconf-submit@gnu.org, ${email}
+:MAIL_FOLLOWUP_TO: emacsconf-submit@gnu.org, ${email}
+:CC: emacsconf-submit@gnu.org
+:END:
+
+Hi, ${speakers-short}!
+
+${prerec-note}Here are the instructions for uploading the video${plural} for your talk${plural}.
+You can find the latest version of the instructions at https://emacsconf.org/2022/upload/ .
+There are two ways to upload your talk${plural} this year:
+- Web-based: https://ftp-upload.emacsconf.org , password emacsconf
+- FTP: host: ftp-upload.emacsconf.org, port: 21, username: anonymous, folder: upload-here
+
+If you upload slides and other resources, we can include them on the
+talk page when your talk goes live. If you happen to have a script,
+please include that as well. We can use it to help with captions.
+
+Please start your filenames with the ID for the talk that it's for:
+${slugs}.
+
+If you're still working on your talk, you might find the tips at https://emacsconf.org/2022/prepare useful. In brief:
+- at least 1280x720 resolution
+- we recommend light text on a dark background, with enough contrast to make it easy to read
+- if possible, use a headset or external microphone to record your audio
+- if you can leave 5 seconds of quiet (just background noise) at the end of the video, we can try to use that for noise reduction
+
+Please plan to upload your talk by November 4 (next Friday) so that we
+can get started preparing it for streaming. If you can't make it by
+then, we can accept later submissions, although it's a bit more of a
+scramble and our stress levels go up as the conference approaches. =)
+We'd really appreciate the extra time for captioning and
+double-checking. Thank you for your help in getting ready for a smooth
+EmacsConf 2022!
+
+Sacha Chua
 ** TODO Write volunteer update 2022-10-23
 :PROPERTIES:
 :CUSTOM_ID: volunteer-2022-10-23