aelve/guide
1
1
Fork 0
mirror of https://github.com/aelve/guide.git synced 2024-11-22 03:12:58 +03:00
Code Issues Projects Releases Wiki Activity

Change 'addTargetBlank' comment (#407)

Browse Source
This commit is contained in:
Artyom Kazak 2019-10-30 17:27:19 +03:00 committed by mergify[bot]
parent 027a05d3d7
commit 958afba90b
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
back/src/Guide/Markdown.hs
View File

@ -191,9 +191,10 @@ extractInlines = concatMap go
HTML_INLINE xs -> [MD.Node Nothing (CODE xs) []]
CODE_BLOCK _ xs -> [MD.Node Nothing (CODE xs) []]
-- | Convert LINK to HTML_INLINE with 'target="_blank"' attribute added.
-- | Convert 'LINK' to 'HTML_INLINE' with @target="_blank"@ attribute added.
--
-- It is necessary that the rendered html page be opened in a new tab.
-- It will cause the link to be opened in a new tab, which is the behavior
-- we want for links in user-submitted content.
addTargetBlank :: MD.Node -> MD.Node
addTargetBlank (MD.Node pos (LINK url title) ns) =
MD.Node pos (HTML_INLINE blankLink) []