diff options
Diffstat (limited to 'hcel-client.el')
-rw-r--r-- | hcel-client.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/hcel-client.el b/hcel-client.el index 532fc88..1e30167 100644 --- a/hcel-client.el +++ b/hcel-client.el @@ -68,6 +68,16 @@ (name (alist-get 'name approx-location-info))) (hcel-api-definition-site package-id component-id module-name entity name))) +(defun hcel-definition-site-external-id (external-id) + "Call definitionSite using external id." + (let* ((splitted (split-string external-id "|")) + (package-id (hcel-parse-package-id (car splitted) "-")) + (module-name (cadr splitted)) + (entity (caddr splitted)) + (name (cadddr splitted))) + (hcel-api-definition-site + package-id "lib" module-name entity name))) + (defun hcel-approx-to-exact-location (approx-location-info) "Fetch exact location given approximate location. |