hls-call-hierarchy-plugin 2.5.0.0 → 2.6.0.0

raw patch · 3 files changed

+11/−11 lines, 3 filesdep ~ghcidedep ~hls-plugin-apidep ~hls-test-utilsPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: ghcide, hls-plugin-api, hls-test-utils

API changes (from Hackage documentation)

Files

• hls-call-hierarchy-plugin.cabal +4/−4
• src/Ide/Plugin/CallHierarchy.hs +2/−1
• src/Ide/Plugin/CallHierarchy/Query.hs +5/−6

@@ -1,6 +1,6 @@ cabal-version:      2.4 name:               hls-call-hierarchy-plugin-version:            2.5.0.0+version:            2.6.0.0 synopsis:           Call hierarchy plugin for Haskell Language Server description:   Please see the README on GitHub at <https://github.com/haskell/haskell-language-server/tree/master/plugins/hls-call-hierarchy-plugin#readme>@@ -33,9 +33,9 @@     , base                  >=4.12 && <5     , containers     , extra-    , ghcide                == 2.5.0.0+    , ghcide                == 2.6.0.0     , hiedb-    , hls-plugin-api        == 2.5.0.0+    , hls-plugin-api        == 2.6.0.0     , lens     , lsp                    >=2.3     , sqlite-simple@@ -58,7 +58,7 @@     , extra     , filepath     , hls-call-hierarchy-plugin-    , hls-test-utils              == 2.5.0.0+    , hls-test-utils              == 2.6.0.0     , ghcide-test-utils     , lens     , lsp

@@ -1,3 +1,4 @@+{-# LANGUAGE OverloadedStrings #-} module Ide.Plugin.CallHierarchy (descriptor) where  import           Development.IDE@@ -6,7 +7,7 @@ import           Language.LSP.Protocol.Message  descriptor :: PluginId -> PluginDescriptor IdeState-descriptor plId = (defaultPluginDescriptor plId)+descriptor plId = (defaultPluginDescriptor plId "Provides call-hierarchy support in Haskell")     { Ide.Types.pluginHandlers =         mkPluginHandler SMethod_TextDocumentPrepareCallHierarchy X.prepareCallHierarchy      <> mkPluginHandler SMethod_CallHierarchyIncomingCalls X.incomingCalls

@@ -11,8 +11,7 @@ import qualified Data.Text                      as T import           Database.SQLite.Simple import           Development.IDE.GHC.Compat-import           HieDb                          (HieDb (getConn), Symbol (..),-                                                 toNsChar)+import           HieDb                          (HieDb (getConn), Symbol (..)) import           Ide.Plugin.CallHierarchy.Types  incomingCalls :: HieDb -> Symbol -> IO [Vertex]@@ -73,9 +72,9 @@             ]         ) (occ, sl, sc, sl, el, ec, el) -parseSymbol :: Symbol -> (String, String, String)+parseSymbol :: Symbol -> (OccName, ModuleName, Unit) parseSymbol Symbol{..} =-    let o = toNsChar (occNameSpace symName) : occNameString symName-        m = moduleNameString $ moduleName symModule-        u = unitString $ moduleUnit symModule+    let o = symName+        m = moduleName symModule+        u = moduleUnit symModule     in  (o, m, u)