diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2017-02-12 17:09:44 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2017-02-12 17:09:44 +0300 |
| commit | 9e3f5a5147c2cbc7d230c6fe7d8eaf8244b70c24 (patch) | |
| tree | 595f81b2a3ca1fb18dc67c4c5dde201ae71c17e7 | |
| parent | 48f809384ab94912234b95087cef6b30b26935b1 (diff) | |
| download | pandoc-9e3f5a5147c2cbc7d230c6fe7d8eaf8244b70c24.tar.gz | |
Do not strip # from Org anchor links
Links with # are perfectly valid according to http://orgmode.org/manual/Internal-links.html#Internal-links
| -rw-r--r-- | src/Text/Pandoc/Writers/Org.hs | 2 |
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 |