diff options
| -rw-r--r-- | data/templates/default.revealjs | 13 | ||||
| -rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 6 |
2 files changed, 18 insertions, 1 deletions
diff --git a/data/templates/default.revealjs b/data/templates/default.revealjs index 78edbae77..5278dd145 100644 --- a/data/templates/default.revealjs +++ b/data/templates/default.revealjs @@ -232,6 +232,19 @@ $endif$ // devices. It is advisable to set this to a lower number than // viewDistance in order to save resources. mobileViewDistance: $mobileViewDistance$, +$if(view)$ + + // Enable scroll view + view: '$view/nowrap$', + // see https://revealjs.com/scroll-view/#scrollbar + scrollProgress: $scrollProgress$, + // see https://revealjs.com/scroll-view/#url-activation + scrollActivationWidth: '$scrollActivationWidth$', + // see https://revealjs.com/scroll-view/#scroll-snapping + scrollSnap: '$scrollSnap$', + // Experimental. see https://revealjs.com/scroll-view/#scroll-snapping + scrollLayout: '$scrollLayout$', +$endif$ $if(parallaxBackgroundImage)$ // Parallax background image diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 95aa1ac24..cdfe89879 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -432,7 +432,11 @@ pandocToHtml opts (Pandoc meta blocks) = do defField "transitionSpeed" ("default" :: Doc Text) . defField "backgroundTransition" ("fade" :: Doc Text) . defField "viewDistance" ("3" :: Doc Text) . - defField "mobileViewDistance" ("2" :: Doc Text) + defField "mobileViewDistance" ("2" :: Doc Text) . + defField "scrollProgress" True . + defField "scrollActivationWidth" ("0" :: Doc Text) . + defField "scrollSnap" ("mandatory" :: Doc Text) . + defField "scrollLayout" ("full" :: Doc Text) else id) . defField "document-css" (isNothing mCss && slideVariant == NoSlides) . defField "quotes" (stQuotes st) . |