Restore kick (#676)

haskell · Dec 16, 2020 · c64490f · c64490f
1 parent 6a692de
commit c64490f
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/haskell-language-server.cabal b/haskell-language-server.cabal
@@ -67,6 +67,7 @@ library
     , optparse-applicative
     , optparse-simple
     , process
+    , shake
     , unordered-containers
 
   ghc-options:      -Wall -Wredundant-constraints -Wno-name-shadowing

diff --git a/src/Ide/Main.hs b/src/Ide/Main.hs
@@ -54,6 +54,7 @@ import System.FilePath
 import System.IO
 import qualified System.Log.Logger as L
 import System.Time.Extra
+import Development.Shake (action)
 
 -- ---------------------------------------------------------------------
 -- ghcide partialhandlers
@@ -136,7 +137,7 @@ runLspMode lspArgs@LspArguments{..} idePlugins = do
                     -- , optCheckProject   = checkProject config
                     }
             debouncer <- newAsyncDebouncer
-            initialise caps (mainRule >> pluginRules plugins)
+            initialise caps (mainRule >> pluginRules plugins >> action kick)
                 getLspId event wProg wIndefProg hlsLogger debouncer options vfs
     else do
         -- GHC produces messages with UTF8 in them, so make sure the terminal doesn't error