From 7c6dbd37eb3e785f875e0030d723e422db72d453 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sat, 30 May 2020 12:10:27 -0700
Subject: [PATCH] Change default revealjs-url to use CDN version of revealjs
v4.
See #6408.
---
MANUAL.txt | 3 ++-
src/Text/Pandoc/Writers/HTML.hs | 2 +-
2 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/MANUAL.txt b/MANUAL.txt
index 1bdb09850..52474c9bc 100644
--- a/MANUAL.txt
+++ b/MANUAL.txt
@@ -2146,7 +2146,8 @@ All [reveal.js configuration options] are available as variables.
To turn off boolean flags that default to true in reveal.js, use `0`.
`revealjs-url`
-: base URL for reveal.js documents (defaults to `reveal.js`)
+: base URL for reveal.js documents (defaults to
+ `https://unpkg.com/reveal.js@^4/`)
`s5-url`
: base URL for S5 documents (defaults to `s5/default`)
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index 9f51c28de..11daaf06b 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -340,7 +340,7 @@ pandocToHtml opts (Pandoc meta blocks) = do
defField "slidy-url"
("https://www.w3.org/Talks/Tools/Slidy2" :: Text) $
defField "slideous-url" ("slideous" :: Text) $
- defField "revealjs-url" ("reveal.js" :: Text) $
+ defField "revealjs-url" ("https://unpkg.com/reveal.js@^4/" :: Text) $
defField "s5-url" ("s5/default" :: Text) $
defField "html5" (stHtml5 st)
metadata