@@ -1,5 +1,5 @@
11module Spec.Golden.TraceTree
2− ( tests,
2+ ( tests
33 )
44where
55
@@ -12,6 +12,7 @@ import Data.OpenApi.Compare.Validate.OpenApi ()
1212import Data.Text (Text)
1313import qualified Data.Text.Encoding as T
1414import qualified Data.Yaml as Yaml
15+import Paths_compaREST
1516import Spec.Golden.Extra
1617import Test.Tasty (TestTree, testGroup)
1718import Text.Pandoc.Builder
@@ -22,10 +23,11 @@ import Prelude hiding (id, (.))
2223
2324tests :: IO TestTree
2425tests = do
26+ dir <- getDataDir
2527 traceTreeTests <-
2628 goldenInputsTreeUniform
2729 "TraceTree"
28− "test/golden/common"
30+ dir
2931 "trace-tree.yaml"
3032 ("a.yaml", "b.yaml")
3133 Yaml.decodeFileThrow
@@ -34,7 +36,7 @@ tests = do
3436 reportTests <-
3537 goldenInputsTreeUniform
3638 "Report"
37− "test/golden/common"
39+ dir
3840 "report.md"
3941 ("a.yaml", "b.yaml")
4042 Yaml.decodeFileThrow