Adapt GhcModPluginSpec after merge of haskell#1496

This missed CI as it came in from haskell#1505
alanz · Dec 29, 2019 · f99237b · f99237b
1 parent 310450e
commit f99237b
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/test/unit/GhcModPluginSpec.hs b/test/unit/GhcModPluginSpec.hs
@@ -39,7 +39,7 @@ ghcmodSpec =
       fp <- makeAbsolute "./FileWithWarning.hs"
       let act = setTypecheckedModule arg
           arg = filePathToUri fp
-      IdeResultOk (_,env) <- runSingle testPlugins act
+      IdeResultOk (_,env) <- runSingle testPlugins fp act
       case env of
         [] -> return ()
         [s] -> T.unpack s `shouldStartWith` "Loaded package environment from"
@@ -55,7 +55,7 @@ ghcmodSpec =
                             "Variable not in scope: x"
                             Nothing
 
-      testCommand testPlugins act "ghcmod" "check" arg res
+      testCommand testPlugins fp act "ghcmod" "check" arg res
 
 
 -- ----------------------------------------------------------------------------
@@ -72,7 +72,7 @@ ghcmodSpec =
             , (Range (toPos (5,1)) (toPos (5,14)), "Int -> Int")
             ]
 
-      testCommand testPlugins act "ghcmod" "type" arg res
+      testCommand testPlugins fp act "ghcmod" "type" arg res
 
 
 -- ----------------------------------------------------------------------------