aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2025-02-16 14:43:37 -0800
committerJohn MacFarlane <[email protected]>2025-02-16 14:43:37 -0800
commitdbe2495ad4bc230ca963d95e3bd99deaa33e1648 (patch)
treee4d6792b1727f33da4a3866e23f8d0ede5b3c7e9 /src
parentabf0b5123b5a006146efa2e9bf39297b5dc8d9ac (diff)
EPUB writer: use a nonbreaking space after section number in nav.xhtml.
This seems to be required for iOS books app to display the space.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/EPUB.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index a29bb6aa3..f1d4bb95e 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -922,7 +922,7 @@ createNavEntry opts meta metadata
subs <- catMaybes <$> mapM mkItem subsecs
let secnum' = case secNumber secinfo of
Just num -> [Span ("", ["section-header-number"], [])
- [Str num] , Space]
+ [Str num] , Str "\160"]
Nothing -> []
let title' = secnum' <> secTitle secinfo
-- can't have <a> elements inside generated links...