summaryrefslogtreecommitdiffstats
path: root/emacsconf-publish.el
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2022-10-31 14:38:51 -0400
committerSacha Chua <sacha@sachachua.com>2022-10-31 14:38:51 -0400
commit4b0c3d02c24132dec0af2d5f57a04f5209cddbd6 (patch)
treeca6b7a07a627aed417d3ba0d8352e1a3a2df5bba /emacsconf-publish.el
parentdef383660144df547b7ce41cf4322222e39336d1 (diff)
downloademacsconf-el-4b0c3d02c24132dec0af2d5f57a04f5209cddbd6.tar.xz
emacsconf-el-4b0c3d02c24132dec0af2d5f57a04f5209cddbd6.zip
Push talk info and play talk on streaming server
Diffstat (limited to 'emacsconf-publish.el')
-rw-r--r--emacsconf-publish.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el
index 29551f7..04775e5 100644
--- a/emacsconf-publish.el
+++ b/emacsconf-publish.el
@@ -280,13 +280,12 @@ ${chapter-list}
(let ((extra-info (mapconcat #'identity
(delq nil (list
(unless (string= (plist-get o :pronunciation) "nil") (plist-get o :pronunciation))
- (unless (string= (plist-get o :pronouns) "nil") (plist-get o :pronouns))
(when (plist-get o :irc) (format "IRC: %s" (plist-get o :irc)))
(when (plist-get o :public-email) (format "<mailto:%s>" (plist-get o :public-email)))))
", ")))
- (concat (plist-get o :speakers)
+ (concat (plist-get o :speakers-with-pronouns)
(if (> (length extra-info) 0)
- (concat " (" extra-info ")")
+ (concat " - " extra-info)
""))))
(defun emacsconf-generate-talk-page (o &optional force)