From 706867e1c961b500fbaac73e85c50d2d4300b1ff Mon Sep 17 00:00:00 2001
From: Sacha Chua <sacha@sachachua.com>
Date: Thu, 3 Dec 2020 09:44:01 -0500
Subject: Update code for talk page

---
 2020/submissions.org | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/2020/submissions.org b/2020/submissions.org
index 13404475..90187754 100644
--- a/2020/submissions.org
+++ b/2020/submissions.org
@@ -170,7 +170,7 @@ execute the buffer, update the talk's info/TALKID.md file.
 
 ** NOVEMBER 28 (Saturday)                                              :sat:
 
-*** 9:00 - 9:30 Opening remarks
+*** Opening remarks
 SCHEDULED: <2020-11-28 Sat 09:00-09:30>
 :PROPERTIES:
 :FIXED_TIME: t
@@ -1773,7 +1773,7 @@ material owned by third parties, I represent that the material is
 sublicensable to the EmacsConf organizers or that my use of them is
 fair use.
 
-*** 16:30 - 17:00 Closing remarks
+*** Closing remarks
 SCHEDULED: <2020-11-28 Sat 16:30-17:00>
 :PROPERTIES:
 :FIXED_TIME: t
@@ -1785,7 +1785,7 @@ SCHEDULED: <2020-11-28 Sat 16:30-17:00>
 
 ** NOVEMBER 29 (Sunday)                                                :sun:
 
-*** 9:00 - 9:10 Opening remarks
+*** Opening remarks
 SCHEDULED: <2020-11-29 Sun 09:00-09:10>
 :PROPERTIES:
 :FIXED_TIME: t
@@ -2937,7 +2937,7 @@ material owned by third parties, I represent that the material is
 sublicensable to the EmacsConf organizers or that my use of them is
 fair use.
 
-*** 16:30 - 17:00 Closing remarks
+*** Closing remarks
 SCHEDULED: <2020-11-29 Sun 16:30-17:00>
 :PROPERTIES:
 :FIXED_TIME: t
@@ -3303,14 +3303,14 @@ Talk page: <https://emacsconf.org/2020/schedule/%s>
     (with-temp-buffer
       (find-file "talk-details.md")
       (erase-buffer)
-      (insert (format "<ul>%s</ul>"
+      (insert (format "<table><thead><th>Title</th><th>Speakers</th></thead><tbody>%s</tbody></table>"
                       (mapconcat
                        (lambda (o)
                          (let* ((title (plist-get o :title))
                                 (speakers (plist-get o :speakers)))
-                           (if (eq (plist-get o :type) 'headline)
-                               (format "<li>%s</li>" (conf/format-talk-link o))
-                             (format "<li>%s - %s</li>" (conf/format-talk-link o)
+                           (if (null (plist-get o :talk-id))
+                               (format "<tr><td colspan=\"2\"%s</td></tr>" (plist-get o :title))
+                             (format "<tr><td>%s</td><td>%s</td><tr>" (conf/format-talk-link o)
                                      (plist-get o :speakers)))))
                        (cdr info) "\n")))
       (save-buffer))))
-- 
cgit v1.2.3