diff options
| author | Sacha Chua <sacha@sachachua.com> | 2022-11-01 10:49:27 -0400 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2022-11-01 10:49:27 -0400 |
| commit | 9759c8ce4605da4542370f372fd84a51bca05767 (patch) | |
| tree | c471a4c1579a3e5a5622bf6517049f29a9dc0197 | |
| parent | 03cbfa1e55994f0230cbd32a26b73fd618ee4e5a (diff) | |
| download | emacsconf-el-9759c8ce4605da4542370f372fd84a51bca05767.tar.xz emacsconf-el-9759c8ce4605da4542370f372fd84a51bca05767.zip | |
use backstage dir
| -rw-r--r-- | emacsconf-publish.el | 6 |
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 |