diff options
author | Sacha Chua <sacha@sachachua.com> | 2020-11-30 19:32:03 -0500 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2020-11-30 19:32:03 -0500 |
commit | 7cc37a18798f1a6bea99d56946dceea49c955c9a (patch) | |
tree | ff25ccf5f9856b57b9d9ba9452119060a2a25e2d /2020/submissions.org | |
parent | de8062b1ab1f854cfd67fc38965a81a42f1a4461 (diff) | |
download | emacsconf-wiki-7cc37a18798f1a6bea99d56946dceea49c955c9a.tar.xz emacsconf-wiki-7cc37a18798f1a6bea99d56946dceea49c955c9a.zip |
Try fixing the redirect
Diffstat (limited to '2020/submissions.org')
-rw-r--r-- | 2020/submissions.org | 27 |
1 files changed, 12 insertions, 15 deletions
diff --git a/2020/submissions.org b/2020/submissions.org index eece253c..12c3f04e 100644 --- a/2020/submissions.org +++ b/2020/submissions.org @@ -3166,7 +3166,7 @@ The total is written to the MIN_TIME_SUM property of this heading" list)) (defun conf/format-talk-link (talk) - (and talk (format "<a href=\"/2020/schedule/%s\">%s</a>" + (and talk (format "<a href=\"/2020/talks/%s\">%s</a>" (plist-get talk :talk-id) (plist-get talk :title)))) @@ -3214,6 +3214,15 @@ The total is written to the MIN_TIME_SUM property of this heading" (let* ((timestamp (org-timestamp-from-string (plist-get o :scheduled))) (next-talk (conf/format-talk-link (pop next-talks))) (prev-talk (conf/format-talk-link (pop prev-talks))) + (schedule (mapconcat + (lambda (tz) + (format "%s - %s" + (format-time-string "%A, %b %e %Y, ~%l:%M %p" + (org-timestamp-to-time (org-timestamp-split-range timestamp)) tz) + (format-time-string "%l:%M %p %Z" + (org-timestamp-to-time (org-timestamp-split-range timestamp t)) tz))) + conf/timezones + " \n")) (nav-links (format "Back to the [[schedule]] \n%s%s" (if prev-talk (format "Previous: %s \n" prev-talk) "") (if next-talk (format "Next: %s \n" next-talk) "")))) @@ -3224,10 +3233,7 @@ The total is written to the MIN_TIME_SUM property of this heading" %s -Approximate time (might be earlier or later): -%s - -[[!inline pages=\"internal(2020/info/%s)\" raw=\"yes\"]] +!inline pages=\"internal(2020/info/%s)\" raw=\"yes\"]] %s @@ -3240,18 +3246,9 @@ conference for instructions on how to watch and participate. See you then! "!meta" (plist-get o :speakers) nav-links - (mapconcat - (lambda (tz) - (format "%s - %s" - (format-time-string "%A, %b %e %Y, ~%l:%M %p" - (org-timestamp-to-time (org-timestamp-split-range timestamp)) tz) - (format-time-string "%l:%M %p %Z" - (org-timestamp-to-time (org-timestamp-split-range timestamp t)) tz))) - conf/timezones - " \n") (plist-get o :talk-id) nav-links))) - (write-file (format "schedule/%s.md" (plist-get o :talk-id))))) + (write-file (format "talks/%s.md" (plist-get o :talk-id))))) talks))) (defun conf/get-talk-info-from-file (&optional filename) |