We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent a3bc949 commit a9112dcCopy full SHA for a9112dc
ghcide
src/Ide/Plugin.hs
@@ -26,6 +26,7 @@ import Control.Monad
26
import qualified Data.Aeson as J
27
import qualified Data.Default
28
import Data.Either
29
+import Data.Hashable (unhashed)
30
import qualified Data.List as List
31
import qualified Data.Map as Map
32
import Data.Maybe
@@ -599,7 +600,7 @@ getClientConfig lf = fromMaybe Data.Default.def <$> LSP.config lf
599
600
-- You can use this function to access it from shake Rules
601
getClientConfigAction :: Action Config
602
getClientConfigAction = do
- mbVal <- useNoFile_ GetClientSettings
603
+ mbVal <- unhashed <$> useNoFile_ GetClientSettings
604
logm $ "getClientConfigAction:clientSettings:" ++ show mbVal
605
case J.fromJSON <$> mbVal of
606
Just (J.Success c) -> return c
0 commit comments