From ecd4bd665d2db259a3255426cb6ba64be872aeaf Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Sat, 21 Sep 2013 18:45:17 +0900 Subject: [PATCH] removing unnecesary code. --- test/CradleSpec.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/CradleSpec.hs b/test/CradleSpec.hs index 17b5934..7e17296 100644 --- a/test/CradleSpec.hs +++ b/test/CradleSpec.hs @@ -54,5 +54,5 @@ relativeCradle dir cradle = Cradle { cradleCurrentDir = toRelativeDir dir $ cradleCurrentDir cradle , cradleCabalDir = toRelativeDir dir <$> cradleCabalDir cradle , cradleCabalFile = toRelativeDir dir <$> cradleCabalFile cradle - , cradlePackageDbOpts = map (toRelativeDir dir) (cradlePackageDbOpts cradle) + , cradlePackageDbOpts = cradlePackageDbOpts cradle }