aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-02-14 13:49:56 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-02-15 14:33:25 +0300
commit9131d62c9b9a70829e0d938d0d201a09b2cec179 (patch)
tree1197d336d255ad663e29d124a7736d56516720f9 /test
parent6dcb9744237be713f4ef94017a6b68fc0cfddb73 (diff)
downloadpandoc-9131d62c9b9a70829e0d938d0d201a09b2cec179.tar.gz
Muse writer: use unicode quotes for quoted text
Diffstat (limited to 'test')
-rw-r--r--test/Tests/Writers/Muse.hs8
-rw-r--r--test/writer.muse16
2 files changed, 12 insertions, 12 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index a7d6b76ba..13c457a37 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -311,8 +311,8 @@ tests = [ testGroup "block elements"
, "superscript" =: superscript (text "foo") =?> "<sup>foo</sup>"
, "subscript" =: subscript (text "foo") =?> "<sub>foo</sub>"
, "smallcaps" =: smallcaps (text "foo") =?> "foo"
- , "single quoted" =: singleQuoted (text "foo") =?> "'foo'"
- , "double quoted" =: doubleQuoted (text "foo") =?> "\"foo\""
+ , "single quoted" =: singleQuoted (text "foo") =?> "‘foo’"
+ , "double quoted" =: doubleQuoted (text "foo") =?> "“foo”"
-- Cite is trivial
, testGroup "code"
[ "simple" =: code "foo" =?> "<code>foo</code>"
@@ -370,7 +370,7 @@ tests = [ testGroup "block elements"
"<em>foo</em>bar"
, "emph quoted" =:
para (doubleQuoted (emph (text "foo"))) =?>
- "\"<em>foo</em>\""
+ "“<em>foo</em>”"
, "strong word before" =:
para (text "foo" <> strong (text "bar")) =?>
"foo<strong>bar</strong>"
@@ -379,7 +379,7 @@ tests = [ testGroup "block elements"
"<strong>foo</strong>bar"
, "strong quoted" =:
para (singleQuoted (strong (text "foo"))) =?>
- "'<strong>foo</strong>'"
+ "‘<strong>foo</strong>’"
]
]
]
diff --git a/test/writer.muse b/test/writer.muse
index aed30ba4a..cd6d05432 100644
--- a/test/writer.muse
+++ b/test/writer.muse
@@ -492,16 +492,16 @@ spaces: a^b c^d, a~b c~d.
* Smart quotes, ellipses, dashes
-"Hello," said the spider. "'Shelob' is my name."
+“Hello,” said the spider. “‘Shelob’ is my name.”
-'A', 'B', and 'C' are letters.
+‘A’, ‘B’, and ‘C’ are letters.
-'Oak,' 'elm,' and 'beech' are names of trees. So is 'pine.'
+‘Oak,’ ‘elm,’ and ‘beech’ are names of trees. So is ‘pine.’
-'He said, "I want to go."' Were you alive in the 70’s?
+‘He said, “I want to go.”’ Were you alive in the 70’s?
-Here is some quoted '<code>code</code>' and a
-"[[http://example.com/?foo=1&bar=2][quoted link]]".
+Here is some quoted ‘<code>code</code>’ and a
+“[[http://example.com/?foo=1&bar=2][quoted link]]”.
Some dashes: one—two — three—four — five.
@@ -527,7 +527,7 @@ Ellipses…and…and….
These shouldn’t be math:
- To get the famous equation, write <code>$e = mc^2$</code>.
- - $22,000 is a <em>lot</em> of money. So is $34,000. (It worked if "lot" is
+ - $22,000 is a <em>lot</em> of money. So is $34,000. (It worked if “lot” is
emphasized.)
- Shoes ($20) and socks ($5).
- Escaped <code>$</code>: $73 <em>this should be emphasized</em> 23$.
@@ -679,7 +679,7 @@ or here: <http://example.com/>
* Images
-From "Voyage dans la Lune" by Georges Melies (1902):
+From “Voyage dans la Lune” by Georges Melies (1902):
[[lalune.jpg][Voyage dans la Lune]]