From 2764ea3a391f07bae0ac2c69af05770f751e7e76 Mon Sep 17 00:00:00 2001
From: Sacha Chua <sacha@sachachua.com>
Date: Wed, 26 Oct 2022 15:35:48 -0400
Subject: document schedule change process
---
2022/organizers-notebook/index.org | 38 +++++++++++++++++++++-----------------
1 file changed, 21 insertions(+), 17 deletions(-)
(limited to '2022/organizers-notebook')
diff --git a/2022/organizers-notebook/index.org b/2022/organizers-notebook/index.org
index da7172b1..fc1177b2 100644
--- a/2022/organizers-notebook/index.org
+++ b/2022/organizers-notebook/index.org
@@ -2242,7 +2242,8 @@ mpv --vf=negate $url
- Test it using the blocks near the beginning of conf.org
- emacsconf-publish-update-schedule
-- E-mail affected speakers
+- E-mail affected speakers - see emacsconf-mail-schedule-update function
+
* Task archive
:PROPERTIES:
:CUSTOM_ID: archive
@@ -2561,15 +2562,18 @@ GROUP is (email . (talk talk))"
(plist-get o :title)
(plist-get o :slug)
(plist-get o :track)
- (string-join
- (let ((emacsconf-timezones
- (if (plist-get o :timezone)
- (seq-uniq (append (list emacsconf-timezone)
- (split-string (plist-get o :timezone) " ")
- (list "UTC")))
- emacsconf-timezones)))
- (emacsconf-timezone-strings o))
- "\n")
+ (replace-regexp-in-string
+ "^\\(.*\\)\n\\(.*\\)"
+ "\\1\nIn other timezones:\n\\2"
+ (string-join
+ (let ((emacsconf-timezones
+ (if (plist-get o :timezone)
+ (seq-uniq (append (list emacsconf-timezone)
+ (split-string (plist-get o :timezone) " ")
+ (list "UTC")))
+ emacsconf-timezones)))
+ (emacsconf-timezone-strings o))
+ "\n"))
draft-schedule))
(cdr group)
"\n----------------------------------------------------------------\n")
@@ -2578,7 +2582,7 @@ GROUP is (email . (talk talk))"
:timezone-note
(if (plist-get (cadr group) :timezone)
(format "I've included timezone conversion to %s. Let me know if you'd like me to use a different timezone in future e-mails."
- (plist-get (cadr group) :timezone) " ")
+ (plist-get (cadr group) :timezone))
"I can translate times into your local timezone. Let me know what timezone you'd like me to use.")
:availability-note
(cond
@@ -2667,18 +2671,18 @@ Sacha
:MAIL_FOLLOWUP_TO: emacsconf-submit@gnu.org, ${email}
:CC: emacsconf-submit@gnu.org
:FUNCTION: emacsconf-mail-schedule-update
-:SLUGS: buddy meetups community
+:SLUGS: buddy meetups
:EMAIL_ID: sched-change-meetups
:END:
Hi ${speakers-short}!
I tweaked the schedule to allocate a little more time for the meetups
-talk, and I moved the buddy talk earlier. I think this might improve
-the flow as well, since the meetups will refer to how meeting up with
-a buddy is a good way to get a public Emacs meetup off the ground. If
-you'd like to see the latest schedule for your talk, you can go to
-https://emacsconf.org/${year}/talks/ . Thanks for your
+talk, and I moved the buddy talk earlier to make space. I think this
+might improve the flow as well, since the meetups will refer to how
+meeting up with a buddy is a good way to get a public Emacs meetup off
+the ground. If you'd like to see the latest schedule for your talk,
+you can go to https://emacsconf.org/${year}/talks/ . Thanks for your
patience!
----------------------------------------------------------------
--
cgit v1.2.3