From 3a8a34d7a50f679f0d3715c339cd5652e2deb7ce Mon Sep 17 00:00:00 2001 From: Sacha Chua Date: Sat, 10 Dec 2022 16:48:09 -0500 Subject: remove backslashes --- 2022/organizers-notebook/index.org | 107 +++++++++++++++++++++++++++++-------- 1 file changed, 84 insertions(+), 23 deletions(-) (limited to '2022/organizers-notebook/index.org') 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> -- cgit v1.2.3