summaryrefslogtreecommitdiffstats
path: root/emacsconf-publish.el
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2022-11-11 19:50:11 -0500
committerSacha Chua <sacha@sachachua.com>2022-11-11 19:50:11 -0500
commitca9fe0077e98cc0f987867251cd5868af80e78d9 (patch)
tree3287b7341f0136dedab0ca22cf6011dbe6050f81 /emacsconf-publish.el
parent6f2da20a2d783ec4fa92608ffb5e6b471b13f8d6 (diff)
downloademacsconf-el-ca9fe0077e98cc0f987867251cd5868af80e78d9.tar.xz
emacsconf-el-ca9fe0077e98cc0f987867251cd5868af80e78d9.zip
Cache video data, check for noninteractive when publishing backstage
Diffstat (limited to 'emacsconf-publish.el')
-rw-r--r--emacsconf-publish.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el
index 4bf356b..e4de38d 100644
--- a/emacsconf-publish.el
+++ b/emacsconf-publish.el
@@ -899,11 +899,13 @@ Entries are sorted chronologically, with different tracks interleaved."
(defun emacsconf-publish-backstage-org-on-state-change (talk)
(save-window-excursion
(emacsconf-with-talk-heading talk
+ (when (member org-state '("PROCESSING" "TO_ASSIGN"))
+ (emacsconf-cache-video-data talk))
(when (member org-state '("TO_CAPTION"))
- (unless (org-entry-get (point) "CAPTIONER")
+ (unless (or noninteractive (org-entry-get (point) "CAPTIONER"))
(org-entry-put (point) "CAPTIONER"
(assoc-default "CUSTOM_ID" (emacsconf-complete-volunteer)))))
- (when (member org-state '("TO_ASSIGN" "TO_CAPTION" "TO_STREAM"))
+ (when (member org-state '("WAITING_FOR_PREREC" "TO_ASSIGN" "TO_CAPTION" "TO_STREAM"))
(emacsconf-publish-backstage-index)))))
(defun emacsconf-publish-backstage-index (&optional filename)