diff options
| -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 |