summaryrefslogtreecommitdiffstats
path: root/2022/organizers-notebook
diff options
context:
space:
mode:
Diffstat (limited to '2022/organizers-notebook')
-rw-r--r--2022/organizers-notebook/index.org107
1 files changed, 84 insertions, 23 deletions
diff --git a/2022/organizers-notebook/index.org b/2022/organizers-notebook/index.org
index 8b127266..c7831300 100644
--- a/2022/organizers-notebook/index.org
+++ b/2022/organizers-notebook/index.org
@@ -357,42 +357,102 @@ Dependencies:
- youtube, toobnix urls
- bbb playback urls
- pads copied
+
+ #+begin_src emacs-lisp
+(defvar emacsconf-mail-thank-speaker-open-youtube t
+ "If non-nil, browse to the YouTube page so we can mention views and stuff.")
+
+(defun emacsconf-mail-thank-speaker (group &optional template)
+ (interactive (list (emacsconf-mail-complete-email-group)))
+ (delete-other-windows)
+ (with-selected-window
+ (split-window-right)
+ (emacsconf-edit-wiki-page (plist-get (cadr group) :slug))
+ (when (> (length (cdr group)) 1)
+ (mapc
+ (lambda (talk)
+ (with-selected-window (split-window-below)
+ (emacsconf-edit-wiki-page (plist-get talk :slug))))
+ (cddr group))
+ (balance-windows (current-window))))
+ (let ((with-bbb (seq-filter (lambda (talk) (plist-get talk :bbb-playback)) (cdr group))))
+ (emacsconf-mail-prepare
+ (or template (emacsconf-mail-merge-get-template "thanks-speaker"))
+ (car group)
+ (list
+ :email (car group)
+ :conf-name emacsconf-name
+ :year
+ emacsconf-year
+ :plural
+ (if (= (length (cdr group)) 1) "" "s")
+ :video-is
+ (if (= (length (cdr group)) 1) "video is" "videos are")
+ :bbb-note
+ (if with-bbb
+ (concat
+ " We'd like to publish the audio (and possibly the video as well)
+ with chapter markers and maybe even captions, depending on
+ volunteers. In case you want to revisit your Q&A sessions in
+ order to remember anything particularly cool that you'd like to
+ follow up on (or anything particularly sensitive/embarrassing
+ that you'd like us to omit), you can view the BigBlueButton
+ playback at " (mapconcat (lambda (talk) (plist-get talk :bbb-playback)) with-bbb " , ") " . Volunteers will be working on harvesting the Q&A over the next few weeks/months. If you'd like to help with the processing, I've added the files
+to ${backstage} and documented our harvesting process at
+https://emacsconf.org/harvesting/ . The files start with --bbb in the backstage area. This is
+totally optional and just there in case you feel like taking advantage
+of it. =)")
+ "")
+ :backstage
+ (mapconcat (lambda (talk)
+ (concat "https://media.emacsconf.org/" emacsconf-year "/backstage/#" (plist-get talk :slug)))
+ (cdr group) " , ")
+ :urls
+ (mapconcat (lambda (talk)
+ (plist-get talk :absolute-url))
+ (cdr group) " , ")
+ :toobnix-url
+ (mapconcat (lambda (talk)
+ (plist-get talk :toobnix-url))
+ (cdr group) " , ")
+ :youtube-url
+ (mapconcat (lambda (talk)
+ (plist-get talk :youtube-url))
+ (cdr group) " , ")
+ :speakers-short (plist-get (cadr group) :speakers-short)))
+ (when emacsconf-mail-thank-speaker-open-youtube
+ (mapc (lambda (talk)
+ (when (plist-get talk :youtube-url)) (browse-url (plist-get talk :youtube-url)))
+ (cdr group)))))
+ #+end_src
+
**** Template
:PROPERTIES:
:EMAIL_ID: thanks-speaker
:TO: ${email}
-:REPLY_TO: emacsconf-submit@gnu.org, ${email}
-:MAIL_FOLLOWUP_TO: emacsconf-submit@gnu.org, ${email}
+:REPLY_TO: emacsconf-submit@gnu.org, ${email}, sacha@sachachua.com
+:MAIL_FOLLOWUP_TO: emacsconf-submit@gnu.org, ${email}, sacha@sachachua.com
+:FUNCTION: emacsconf-mail-thank-speaker
:CC: emacsconf-submit@gnu.org
+:LOG_NOTE: thanked speaker
:SUBJECT: ${conf-name} ${year}: Thank you for presenting
:END:
-Hi ${speakers-short}!
+Hi, ${speakers-short}!
Thank you so much for being part of EmacsConf ${year}! Hundreds of
people enjoyed it, and I'm sure even more will come across the videos
in the days to follow.
-Your video is available on the talk page at ${url} , and we'll be
-working on adding the questions and comments from IRC/BBB/Etherpad.
-We'd like to publish the audio (and possibly the video as well) with
-chapter markers and maybe even captions depending on volunteers. In
-case you want to revisit your Q&A session in order to remember
-anything particularly cool that you'd like to follow up on (or
-anything particularly sensitive/embarrassing that you'd like us to
-omit), you can view the BigBlueButton playback at ${bbb-playback} .
-
-You can also do your own processing, if you like. I've added the files
-to https://media.emacsconf.org/${year}/backstage/#${slug} . They start
-with --bbb. This is totally optional and just there in case you feel
-like taking advantage of it.
-
-We've also uploaded your talk video to ToobNix (a PeerTube instance)
-at ${toobnix-url} and YouTube at ${youtube-url} . If you want to
-reupload the video to your own channel, please feel free to do so. If
-you let me know where you've uploaded it, I can switch our playlist to
-include your version of the video instead. That way, it might be
-easier for you to respond to comments on videos.${wrap}
+Your ${video-is} available on the talk page${plural} at ${urls} , and
+we've added the discussions from Etherpad/IRC.${bbb-note}${wrap}
+
+We've also uploaded your talk video${plural} to Toobnix (a PeerTube
+instance) at ${toobnix-url} and YouTube at ${youtube-url} . If you
+want to reupload the video to your own channel, please feel free to do
+so. If you let me know where you've uploaded it, I think I can switch
+our playlist to include your version of the video instead. That way,
+it might be easier for you to respond to comments on videos.${wrap}
If you would like to share more resources, you can add them to the
talk page or e-mail them to us and we can add them for you.
@@ -401,6 +461,7 @@ Thanks again for speaking at EmacsConf!
Sacha
+
*** TODO Send thank-you notes to volunteers
** STARTED Finalize the files to be used for streaming
SCHEDULED: <2022-12-02 Fri>