From 3a949d34da649b199235b06ab33927ad02cfdc26 Mon Sep 17 00:00:00 2001 From: Chris Wells Date: Thu, 29 Jan 2026 15:33:24 -0600 Subject: Things are compiling nicely finally --- src/Data/Paper.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/Data/Paper.hs') diff --git a/src/Data/Paper.hs b/src/Data/Paper.hs index 0dedc46..b86b2f0 100644 --- a/src/Data/Paper.hs +++ b/src/Data/Paper.hs @@ -92,9 +92,9 @@ data ArXivType = ArXivAbs | ArXivPdf | ArXivSrc arXivTypeRelative :: ArXivType -> URI arXivTypeRelative = \case - ArXivAbs -> [relativeReference|/abs|] - ArXivPdf -> [relativeReference|/pdf|] - ArXivSrc -> [relativeReference|/src|] + ArXivAbs -> [relativeReference|/abs/|] + ArXivPdf -> [relativeReference|/pdf/|] + ArXivSrc -> [relativeReference|/src/|] arXivLink :: ArXivType -> ArXiv a -> URI arXivLink at a = _identifier a `relativeTo` arXivTypeRelative at `relativeTo` arXivURI -- cgit v1.2.3