aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/Typst.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Typst.hs b/src/Text/Pandoc/Readers/Typst.hs
index d6ea1b036..cf869bd73 100644
--- a/src/Text/Pandoc/Readers/Typst.hs
+++ b/src/Text/Pandoc/Readers/Typst.hs
@@ -50,7 +50,7 @@ import Text.Pandoc.Readers.Typst.Parsing (pTok, ignored, getField, P,
import Typst.Methods (formatNumber, applyPureFunction)
import Typst.Types
import qualified Data.Vector as V
-import System.FilePath (takeDirectory, (</>))
+import System.FilePath (takeDirectory)
import qualified System.FilePath.Windows as Windows
import qualified System.FilePath.Posix as Posix
@@ -502,7 +502,7 @@ inlineHandlers = M.fromList
let path' = T.pack $
if isAbsolutePath path || basedir == "."
then path
- else basedir </> path
+ else basedir Posix.</> path
(mbwidth :: Maybe Text) <-
fmap (renderLength False) <$> getField "width" fields
(mbheight :: Maybe Text) <-