diff options
author | Sacha Chua <sacha@sachachua.com> | 2022-11-11 19:50:11 -0500 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2022-11-11 19:50:11 -0500 |
commit | ca9fe0077e98cc0f987867251cd5868af80e78d9 (patch) | |
tree | 3287b7341f0136dedab0ca22cf6011dbe6050f81 | |
parent | 6f2da20a2d783ec4fa92608ffb5e6b471b13f8d6 (diff) | |
download | emacsconf-el-ca9fe0077e98cc0f987867251cd5868af80e78d9.tar.xz emacsconf-el-ca9fe0077e98cc0f987867251cd5868af80e78d9.zip |
Cache video data, check for noninteractive when publishing backstage
Diffstat (limited to '')
-rw-r--r-- | emacsconf-publish.el | 6 |
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) |