diff options
| author | Sacha Chua <sacha@sachachua.com> | 2022-11-21 07:56:10 -0500 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2022-11-21 07:56:10 -0500 |
| commit | 911ca4f70fbd06602c6e8d427638e1c9ee85716a (patch) | |
| tree | 59e15d7740da28d323bb9b1c36d48a48d02e3eaf | |
| parent | 8af894aab639b50270e734877022e25533d209d9 (diff) | |
| download | emacsconf-el-911ca4f70fbd06602c6e8d427638e1c9ee85716a.tar.xz emacsconf-el-911ca4f70fbd06602c6e8d427638e1c9ee85716a.zip | |
add caption note
| -rw-r--r-- | emacsconf-publish.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/emacsconf-publish.el b/emacsconf-publish.el index a1be814..2d5964a 100644 --- a/emacsconf-publish.el +++ b/emacsconf-publish.el @@ -1008,7 +1008,11 @@ Entries are sorted chronologically, with different tracks interleaved." (setq f (append f (list :extra - (if (plist-get f :captioner) (concat "<div class=\"caption-note\">Being captioned by " (plist-get f :captioner) "</div>") "") + + (concat "<div class=\"caption-note\">" + (emacsconf-surround "Being captioned by " (plist-get f :captioner) " " "") + (emacsconf-surround "Note: " (plist-get f :caption-note) "" "") + "</div>") :files (emacsconf-publish-talk-files f files)))) (format "<li><a name=\"%s\"></a><strong><a href=\"%s%s\">%s</a></strong><br />%s (id:%s)<br />%s</li>" |