aboutsummaryrefslogtreecommitdiff
path: root/haddock-library/fixtures/examples/linkInlineMarkup.parsed
diff options
context:
space:
mode:
authorAlec Theriault <alec.theriault@gmail.com>2018-11-06 13:53:30 -0800
committerGitHub <noreply@github.com>2018-11-06 13:53:30 -0800
commitb62c9542480d629bb482f5394dec2fdd5a48af24 (patch)
treeacb4c9df2f760ac930ea209f9d596e09a95df9d0 /haddock-library/fixtures/examples/linkInlineMarkup.parsed
parent82b8f491e18d707f67857bcb170b2147fa275ccc (diff)
parentaeebb79290fb3983271ab9e3fe95dbdae7caccde (diff)
Merge pull request #875 from harpocrates/feature/markup-in-hyperlinks
Inline markup in markdown-style links and images
Diffstat (limited to 'haddock-library/fixtures/examples/linkInlineMarkup.parsed')
-rw-r--r--haddock-library/fixtures/examples/linkInlineMarkup.parsed8
1 files changed, 8 insertions, 0 deletions
diff --git a/haddock-library/fixtures/examples/linkInlineMarkup.parsed b/haddock-library/fixtures/examples/linkInlineMarkup.parsed
new file mode 100644
index 00000000..39adab64
--- /dev/null
+++ b/haddock-library/fixtures/examples/linkInlineMarkup.parsed
@@ -0,0 +1,8 @@
+DocParagraph
+ (DocAppend
+ (DocString "Bla ")
+ (DocHyperlink
+ Hyperlink
+ {hyperlinkLabel = Just (DocAppend (DocString "link ")
+ (DocEmphasis (DocString "emphasized"))),
+ hyperlinkUrl = "http://example.com"}))