File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed
ghcide/src/Development/IDE/Plugin Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -106,7 +106,7 @@ descriptor recorder plId =
106
106
(defaultPluginDescriptor plId desc)
107
107
{ pluginHandlers = mkPluginHandler SMethod_TextDocumentCodeLens codeLensProvider
108
108
<> mkResolveHandler SMethod_CodeLensResolve codeLensResolveProvider
109
- <> mkPluginHandler SMethod_TextDocumentInlayHint whereClauseInlayHints
109
+ <> mkPluginHandler SMethod_TextDocumentInlayHint whereClauseInlayHints
110
110
, pluginCommands = [PluginCommand typeLensCommandId " adds a signature" commandHandler]
111
111
, pluginRules = rules recorder
112
112
, pluginConfigDescriptor = defaultConfigDescriptor {configCustomConfig = mkCustomConfig properties}
@@ -346,8 +346,8 @@ gblBindingType (Just hsc) (Just gblEnv) = do
346
346
renderBind id = do
347
347
let name = idName id
348
348
hasSig name $ do
349
- (_ , sig) <- bindToSig id hsc rdrEnv
350
- pure $ GlobalBindingTypeSig name sig (name `elemNameSet` exports)
349
+ (name' , sig) <- bindToSig id hsc rdrEnv
350
+ pure $ GlobalBindingTypeSig name (printName name' <> " :: " <> sig) (name `elemNameSet` exports)
351
351
patToSig p = do
352
352
let name = patSynName p
353
353
hasSig name
You can’t perform that action at this time.
0 commit comments