git.iko.soy/typeable/pandoc
on master help sign in
EPUB tests: don't use joinPath, which varies across platforms.

Instead, use a forward-slash to join paths, regardless of the platform. This matches the way MediaBag now works. See https://github.com/jgm/pandoc/commit/56e4ecab20613d86a6660547ed87e7ff4b80d632#commitcomment-10858449

commit095b05e4f97301355e20d81135dfb20142eb767f authorJohn MacFarlane <jgm@berkeley.edu> dateWed 22 Apr 2015, 17:38 (11 years ago) parente1d6be4
1 file changed+5−2
compare with master
unifiedsplit
tests/Tests/Readers/EPUB.hs+5−2
tests/Tests/Readers/EPUB.hs+5−2
@@ -8,7 +8,6 @@ import qualified Data.ByteString.Lazy as BL
88import Text.Pandoc.Readers.EPUB
99import Text.Pandoc.MediaBag (MediaBag, mediaDirectory)
1010import Control.Applicative
11−import System.FilePath (joinPath)
1211import Text.Pandoc.Error
1312
1413getMediaBag :: FilePath -> IO MediaBag
@@ -24,7 +23,11 @@ testMediaBag fp bag = do
2423 (actBag == bag)
2524
2625featuresBag :: [(String, String, Int)]
27−featuresBag = [(joinPath ["img","check.gif"],"image/gif",1340),(joinPath ["img","check.jpg"],"image/jpeg",2661),(joinPath ["img","check.png"],"image/png",2815),(joinPath ["img","multiscripts_and_greek_alphabet.png"],"image/png",10060)]
26+featuresBag = [("img/check.gif","image/gif",1340)
27+ ,("img/check.jpg","image/jpeg",2661)
28+ ,("img/check.png","image/png",2815)
29+ ,("img/multiscripts_and_greek_alphabet.png","image/png",10060)
30+ ]
2831
2932tests :: [Test]
3033tests =