summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2022-10-02 07:48:51 -0400
committerSacha Chua <sacha@sachachua.com>2022-10-02 07:48:51 -0400
commit7d2ae4f2b3040c2bfdb74f3a7e69a55a8eb3e484 (patch)
tree40d0c0abe5e760dea02f4fed17b67d2d05567c2b
parent800dd800e8b3ec137111d6fbd798f24f78e46e44 (diff)
downloademacsconf-el-7d2ae4f2b3040c2bfdb74f3a7e69a55a8eb3e484.tar.xz
emacsconf-el-7d2ae4f2b3040c2bfdb74f3a7e69a55a8eb3e484.zip
Fix public-email handling
-rw-r--r--emacsconf-publish.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el
index f5dac7d..644e1b5 100644
--- a/emacsconf-publish.el
+++ b/emacsconf-publish.el
@@ -345,7 +345,11 @@ resources."
(defun emacsconf-format-email-questions-and-comments (talk)
(format "Questions or comments? Please e-mail %s"
- (emacsconf-format-public-email talk (or (plist-get talk :public-email) "emacsconf-org-private@gnu.org"))))
+ (emacsconf-format-public-email talk
+ (or
+ (and (string= (plist-get talk :public-email) "t")) (plist-get talk :email)
+ (plist-get talk :public-email)
+ "emacsconf-org-private@gnu.org"))))
(defun emacsconf-generate-before-page (talk)
"Info included before the abstract."