diff options
author | Sacha Chua <sacha@sachachua.com> | 2022-11-05 21:51:37 -0400 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2022-11-05 21:51:37 -0400 |
commit | f4c4fe009240ae2544d8f6b5830cdc2ebbe7d037 (patch) | |
tree | 6fc5e18eb2761c6c9552e3815532bd03806267fb /emacsconf-publish.el | |
parent | 5dd0d45cece40a625ade8f35f19cb8819ec75d43 (diff) | |
parent | 15d8dd04ce097d3d037ac1b821718feb7837a415 (diff) | |
download | emacsconf-el-f4c4fe009240ae2544d8f6b5830cdc2ebbe7d037.tar.xz emacsconf-el-f4c4fe009240ae2544d8f6b5830cdc2ebbe7d037.zip |
Merge branch 'main' of git.emacsconf.org:pub/emacsconf-el into main
Diffstat (limited to 'emacsconf-publish.el')
-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 fb3a664..b2ff788 100644 --- a/emacsconf-publish.el +++ b/emacsconf-publish.el @@ -225,7 +225,8 @@ (and video-file (let ((tracks (emacsconf-video-subtitle-tracks - (concat video-base ".vtt") + (concat (replace-regexp-in-string "reencoded\\|original" "main" video-base) + ".vtt") (or (plist-get talk :track-base-url) (plist-get talk :base-url)) (plist-get talk :files)))) @@ -841,7 +842,8 @@ Entries are sorted chronologically, with different tracks interleaved." (setq filename (or filename (expand-file-name "index.html" emacsconf-backstage-dir))) (setq emacsconf-info (emacsconf-get-talk-info)) (with-temp-file filename - (let* ((talks (seq-filter (lambda (o) (plist-get o :speakers)) (emacsconf-filter-talks emacsconf-info))) + (let* ((talks (seq-filter (lambda (o) (plist-get o :speakers)) + (emacsconf-active-talks (emacsconf-filter-talks emacsconf-info)))) (by-status (seq-group-by (lambda (o) (plist-get o :status)) talks)) (files (directory-files emacsconf-backstage-dir))) (insert |