summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2022-11-01 10:49:27 -0400
committerSacha Chua <sacha@sachachua.com>2022-11-01 10:49:27 -0400
commit9759c8ce4605da4542370f372fd84a51bca05767 (patch)
treec471a4c1579a3e5a5622bf6517049f29a9dc0197
parent03cbfa1e55994f0230cbd32a26b73fd618ee4e5a (diff)
downloademacsconf-el-9759c8ce4605da4542370f372fd84a51bca05767.tar.xz
emacsconf-el-9759c8ce4605da4542370f372fd84a51bca05767.zip
use backstage dir
-rw-r--r--emacsconf-publish.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el
index f4b6cab..ff341b7 100644
--- a/emacsconf-publish.el
+++ b/emacsconf-publish.el
@@ -189,12 +189,12 @@
emacsconf-tracks)))
(defun emacsconf-index-card-video (video-id video-file talk extensions &optional backstage)
- (let* ((video-base (file-name-base video-file))
+ (let* ((video-base (and video-file (file-name-base video-file)))
(chapter-info (and video-file
(emacsconf-make-chapter-strings
(expand-file-name
(concat video-base "--chapters.vtt")
- emacsconf-protected-media-directory)
+ emacsconf-backstage-dir)
(plist-get talk :track-base-url))))
(info
(append
@@ -1359,7 +1359,7 @@ Entries are sorted chronologically, with different tracks interleaved."
(when (and emacsconf-public-media-directory slug (> (length (string-trim slug)) 0)
;; TODO: make this customizable
(shell-command
- (format "ssh front -- 'rm /var/www/media.emacsconf.org/%s/%s* ; cp -n -l /var/www/media.emacsconf.org/%s/protected/%s* /var/www/media.emacsconf.org/%s/; chmod ugo+r /var/www/media.emacsconf.org/%s/ -R'"
+ (format "ssh media.emacsconf.org -- 'rm /var/www/media.emacsconf.org/%s/%s* ; cp -n -l /var/www/media.emacsconf.org/%s/backstage/%s* /var/www/media.emacsconf.org/%s/; chmod ugo+r /var/www/media.emacsconf.org/%s/ -R'"
emacsconf-year slug
emacsconf-year slug
emacsconf-year