summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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