[commit: haddock] master: Fix bug with diffing wrong files in hyperlinker test runner. (a229331)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/haddock

On branch  : master
Link       : http://git.haskell.org/haddock.git/commitdiff/a229331e45518bc7102acc6b19fc492c85321c4f

>---------------------------------------------------------------

commit a229331e45518bc7102acc6b19fc492c85321c4f
Author: Łukasz Hanuszczak <lukasz.hanuszczak at gmail.com>
Date:   Wed Jul 1 01:22:09 2015 +0200

    Fix bug with diffing wrong files in hyperlinker test runner.


>---------------------------------------------------------------

a229331e45518bc7102acc6b19fc492c85321c4f
 hypsrc-test/run.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hypsrc-test/run.hs b/hypsrc-test/run.hs
index 10b6c25..853c4f0 100755
--- a/hypsrc-test/run.hs
+++ b/hypsrc-test/run.hs
@@ -83,8 +83,8 @@ diff mdl ref out = do
     result <- system $ cmd ++ " " ++ refFile ++ " " ++ outFile
     unless (result == ExitSuccess) $ die "Failed to run `diff` command."
   where
-    refFile = outDir </> takeFileName mdl </> ".ref.nolinks"
-    outFile = outDir </> takeFileName mdl </> ".nolinks"
+    refFile = outDir </> takeBaseName mdl ++ ".ref.nolinks"
+    outFile = outDir </> takeBaseName mdl ++ ".nolinks"