diff options
| author | Albert Krewinkel <albert+github@zeitkraut.de> | 2017-02-12 16:50:36 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2017-02-12 16:50:36 +0100 |
| commit | 64ad6ff8d9aed32198763411f8bf6019aac21805 (patch) | |
| tree | 595f81b2a3ca1fb18dc67c4c5dde201ae71c17e7 /src | |
| parent | 48c78713c8faf445bed23ae3005abdba3273346b (diff) | |
| parent | 9e3f5a5147c2cbc7d230c6fe7d8eaf8244b70c24 (diff) | |
| download | pandoc-64ad6ff8d9aed32198763411f8bf6019aac21805.tar.gz | |
Merge pull request #3438 from ilabdsf/org-anchor-links
Org anchor links
Diffstat (limited to 'src')
| -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 |