Skip to content

Commit a85aaa1

Browse files
committed
fix initialization test error in refactor plugin.
1 parent 4d129c0 commit a85aaa1

File tree

1 file changed

+2
-1
lines changed
  • plugins/hls-refactor-plugin/test

1 file changed

+2
-1
lines changed

plugins/hls-refactor-plugin/test/Main.hs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -100,7 +100,8 @@ initializeTests = withResource acquire release tests
100100
doTest = do
101101
ir <- getInitializeResponse
102102
let Just ExecuteCommandOptions {_commands = List commands} = getActual $ innerCaps ir
103-
zipWithM_ (\e o -> T.isSuffixOf e o @? show (e,o)) expected commands
103+
-- Check if expected exists in commands. Note that commands can arrive in different order.
104+
mapM_ (\e -> any (\o -> T.isSuffixOf e o) commands @? show (expected, show commands)) expected
104105

105106
acquire :: IO (ResponseMessage Initialize)
106107
acquire = run initializeResponse

0 commit comments

Comments
 (0)