git.iko.soy/typeable/pandoc
on master help sign in
ConTeXt writer: use braces, not start/stop, for inline language tags.

This prevents unwanted gobbling of spaces.

commit8683cb596da0a1b0081744cc828c03d5f9460d5b authorJohn MacFarlane <jgm@berkeley.edu> dateSat 16 Nov 2019, 17:20 (7 years ago) parentc4e198c
2 files changed+8−9
compare with master
unifiedsplit
src/Text/Pandoc/Writers/ConTeXt.hs+2−2 test/writers-lang-and-dir.context+6−7
src/Text/Pandoc/Writers/ConTeXt.hs+2−2
@@ -470,8 +470,8 @@ inlineToConTeXt (Span (_,_,kvs) ils) = do
470470 Just "ltr" -> braces $ "\\lefttoright " <> txt
471471 _ -> txt
472472 wrapLang txt = case mblang of
473− Just lng -> "\\start\\language[" <> literal lng
474− <> "]" <> txt <> "\\stop "
473+ Just lng -> braces ("\\language" <>
474+ brackets (literal lng) <> txt)
475475 Nothing -> txt
476476 (wrapLang . wrapDir) <$> inlineListToConTeXt ils
477477
test/writers-lang-and-dir.context+6−7
@@ -98,10 +98,10 @@ German div contents
9898
9999and more text.
100100
101−Next paragraph with a \start\language[en-gb]British span\stop and a
102−word-that-includesa\start\language[de-ch]Swiss German span\stop right?
101+Next paragraph with a {\language[en-gb]British span} and a
102+word-that-includesa{\language[de-ch]Swiss German span}right?
103103
104−Some \start\language[es]Spanish text\stop .
104+Some {\language[es]Spanish text}.
105105
106106\section[title={Combined},reference={combined}]
107107
@@ -116,9 +116,8 @@ French rtl div contents
116116
117117and more text.
118118
119−Next paragraph with a \start\language[en-gb]{\lefttoright British ltr
120−span}\stop and a
121−word-that-includesa\start\language[de-ch]{\lefttoright Swiss German ltr
122−span}\stop right?
119+Next paragraph with a {\language[en-gb]{\lefttoright British ltr span}}
120+and a word-that-includesa{\language[de-ch]{\lefttoright Swiss German ltr
121+span}}right?
123122
124123\stoptext