summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/Org.hs
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2017-02-12 17:09:44 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2017-02-12 17:09:44 +0300
commit9e3f5a5147c2cbc7d230c6fe7d8eaf8244b70c24 (patch)
tree595f81b2a3ca1fb18dc67c4c5dde201ae71c17e7 /src/Text/Pandoc/Writers/Org.hs
parent48f809384ab94912234b95087cef6b30b26935b1 (diff)
Do not strip # from Org anchor links
Links with # are perfectly valid according to http://orgmode.org/manual/Internal-links.html#Internal-links
Diffstat (limited to 'src/Text/Pandoc/Writers/Org.hs')
-rw-r--r--src/Text/Pandoc/Writers/Org.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Org.hs b/src/Text/Pandoc/Writers/Org.hs
index fd4c16c64..55d3fe656 100644
--- a/src/Text/Pandoc/Writers/Org.hs
+++ b/src/Text/Pandoc/Writers/Org.hs
@@ -374,7 +374,7 @@ orgPath :: String -> String
orgPath src =
case src of
[] -> mempty -- wiki link
- ('#':xs) -> xs -- internal link
+ ('#':_) -> src -- internal link
_ | isUrl src -> src
_ | isFilePath src -> src
_ -> "file:" <> src