aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Readers
diff options
context:
space:
mode:
Diffstat (limited to 'tests/Tests/Readers')
-rw-r--r--tests/Tests/Readers/LaTeX.hs51
1 files changed, 26 insertions, 25 deletions
diff --git a/tests/Tests/Readers/LaTeX.hs b/tests/Tests/Readers/LaTeX.hs
index 093ff07e5..99ccb3fe2 100644
--- a/tests/Tests/Readers/LaTeX.hs
+++ b/tests/Tests/Readers/LaTeX.hs
@@ -6,30 +6,31 @@ import Test.Framework
import Tests.Helpers
tests :: [Test]
-tests = [ testGroup "basic" [ latexTest "simplest" "word"
- (Inline $ Str "word")
-
- , latexTest "space" "some text"
- (Inlines $ [Str "some", Space, Str "text"])
-
- , latexTest "emphasis" "\\emph{emphasized}"
- (Inline $ Emph [Str "emphasized"])
- ]
-
- , testGroup "headers" [ latexTest "1. level" "\\section{header}"
- $ Block $ Header 1 [Str "header"]
-
- , latexTest "2. level" "\\subsection{header}"
- $ Block $ Header 2 [Str "header"]
-
- , latexTest "3. level" "\\subsubsection{header}"
- $ Block $ Header 3 [Str "header"]
-
- , latexTest "with emphasis" "\\section{text \\emph{emph}}"
- $ Block $ Header 1 [Str "text", Space, Emph [Str "emph"]]
-
- , latexTest "with link" "\\section{text \\href{/url}{link}}"
- $ Block $ Header 1 [Str "text", Space, Link [Str "link"] ("/url", "")]
- ]
+tests = [ testGroup "basic"
+ [ latexTest "simplest" "word" (Inline $ Str "word")
+ , latexTest "space" "some text"
+ (Inlines $ [Str "some", Space, Str "text"])
+
+ , latexTest "emphasis" "\\emph{emphasized}"
+ (Inline $ Emph [Str "emphasized"])
+ ]
+
+ , testGroup "headers"
+ [ latexTest "1. level" "\\section{header}"
+ $ Block $ Header 1 [Str "header"]
+
+ , latexTest "2. level" "\\subsection{header}"
+ $ Block $ Header 2 [Str "header"]
+
+ , latexTest "3. level" "\\subsubsection{header}"
+ $ Block $ Header 3 [Str "header"]
+
+ , latexTest "with emphasis" "\\section{text \\emph{emph}}"
+ $ Block $ Header 1 [Str "text", Space, Emph [Str "emph"]]
+
+ , latexTest "with link" "\\section{text \\href{/url}{link}}"
+ $ Block
+ $ Header 1 [Str "text", Space, Link [Str "link"] ("/url", "")]
+ ]
]