diff options
| author | Sacha Chua <sacha@sachachua.com> | 2022-12-02 09:01:30 -0500 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2022-12-02 09:01:30 -0500 |
| commit | 17cb751639768fa1b36dd419f1625ad279ac6b5c (patch) | |
| tree | 9d032eff4bfa41bc08100fe441073ca543b9c6f5 | |
| parent | 8a66b962bb7a12e1bc063dc3a64f230a8ea695de (diff) | |
| download | emacsconf-el-17cb751639768fa1b36dd419f1625ad279ac6b5c.tar.xz emacsconf-el-17cb751639768fa1b36dd419f1625ad279ac6b5c.zip | |
simplify chat
| -rw-r--r-- | emacsconf-publish.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el index f37c654..9c71efc 100644 --- a/emacsconf-publish.el +++ b/emacsconf-publish.el @@ -476,10 +476,9 @@ resources." (defun emacsconf-publish-webchat-link (o) (let ((track (emacsconf-get-track (plist-get o :track)))) - (format "<a href=\"%s?join=emacsconf,emacsconf-%s\">#emacsconf-%s</a>" - emacsconf-chat-base - (plist-get track :id) - (plist-get track :id)))) + (format "<a href=\"%s\">#%s</a>" + (plist-get track :webchat-url) + (plist-get track :channel)))) (defvar emacsconf-publish-include-pads t "When non-nil, include Etherpad info.") |