summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2022-11-25 12:28:05 -0500
committerSacha Chua <sacha@sachachua.com>2022-11-25 12:28:05 -0500
commitfb2f3ef90804b854ccd9ad3061b32fff906fa945 (patch)
tree831dea964b0c1308bde67bae71b343d76f4b2ea6
parentbbab65f0e5d668e94408551dc7b055a47a9e4b0a (diff)
downloademacsconf-el-fb2f3ef90804b854ccd9ad3061b32fff906fa945.tar.xz
emacsconf-el-fb2f3ef90804b854ccd9ad3061b32fff906fa945.zip
chapters, spanish
-rw-r--r--emacsconf-publish.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el
index 968a3f2..444b020 100644
--- a/emacsconf-publish.el
+++ b/emacsconf-publish.el
@@ -30,7 +30,7 @@
:type 'string
:group 'emacsconf)
-(defcustom emacsconf-main-extensions '(".webm" "--main.webm" "--main.org" ".org" ".odp" ".pdf" ".el" "--compressed56.webm" "--main.vtt" "--main_fr.vtt" "--main_ja.vtt" "--chapters.vtt" "--main--chapters.vtt" "--script.fountain")
+(defcustom emacsconf-main-extensions '(".webm" "--main.webm" "--main.org" ".org" ".odp" ".pdf" ".el" "--compressed56.webm" "--main.vtt" "--main_fr.vtt" "--main_ja.vtt" "--main_es.vtt" "--chapters.vtt" "--main--chapters.vtt" "--script.fountain")
"Extensions to list on public pages."
:type '(repeat string)
:group 'emacsconf)
@@ -1243,7 +1243,7 @@ Entries are sorted chronologically, with different tracks interleaved."
(let ((chapters (subed-parse-file filename)))
(when chapters
(list
- :track (format "<track kind=\"chapters\" label=\"Chapters\" src=\"%s\"\" />"
+ :track (format "<track kind=\"chapters\" label=\"Chapters\" src=\"%s\" />"
(concat (or track-base-url "") (file-name-nondirectory filename)))
:md (mapconcat (lambda (chapter)
(concat
@@ -1279,9 +1279,9 @@ Entries are sorted chronologically, with different tracks interleaved."
(format "<track label=\"%s\" kind=\"captions\" srclang=\"%s\" src=\"%s\" />"
(cdr lang)
(car lang)
- (concat (or track-base-url "") (file-name-nondirectory lang-file))))
- ""))
- '(("fr" . "French") ("ja" . "Japanese"))
+ (concat (or track-base-url "") (file-name-nondirectory lang-file)))
+ "")))
+ '(("fr" . "French") ("ja" . "Japanese") ("es" . "Spanish"))
"")))
(defun emacsconf-link-file-formats (video-slug extensions)