module Test.Willow.Html5Lib.Common ( dataFile ) where import Paths_willow import System.FilePath ( (>) ) dataFile :: FilePath -> IO FilePath dataFile f = getDataFileName $ dataDir > f where dataDir = "test" > "html5lib-tests"