diff options
author | Sacha Chua <sacha@sachachua.com> | 2022-10-31 14:38:51 -0400 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2022-10-31 14:38:51 -0400 |
commit | 4b0c3d02c24132dec0af2d5f57a04f5209cddbd6 (patch) | |
tree | ca6b7a07a627aed417d3ba0d8352e1a3a2df5bba /emacsconf-publish.el | |
parent | def383660144df547b7ce41cf4322222e39336d1 (diff) | |
download | emacsconf-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.el | 5 |
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) |