[elpa] externals/hcel 0d47d10cfe 12/13: fixing a renamed function

[ELPA Syncer]

branch: externals/hcel
commit 0d47d10cfe4ed7fb8ea7b8013b6593c868be8391
Author: Yuchen Pei <hi@ypei.me>
Commit: Yuchen Pei <hi@ypei.me>

    fixing a renamed function
---
 hcel-client.el  | 11 ++++++-----
 hcel-outline.el |  2 +-
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/hcel-client.el b/hcel-client.el
index 5ec605574b..775d8782c3 100644
--- a/hcel-client.el
+++ b/hcel-client.el
@@ -38,14 +38,15 @@
      packages)))
 
 (defun hcel-api-package-info (package-id)
+  (hcel-url-fetch-json (concat
+                        hcel-host "/files/" (hcel-format-package-id package-id 
"-")
+                        hcel-indexed-dir "/packageInfo.json")))
+
+(defun hcel-list-modules (package-id)
   (mapcar
    (lambda (tuple)
      (prin1-to-string (car tuple) t))
-   (alist-get
-    'modules
-    (hcel-url-fetch-json (concat
-                     hcel-host "/files/" (hcel-format-package-id package-id 
"-")
-                     hcel-indexed-dir "/packageInfo.json")))))
+   (alist-get 'modules (hcel-api-package-info package-id))))
 
 (defun hcel-api-definition-site
     (package-id component-id module-name entity name)
diff --git a/hcel-outline.el b/hcel-outline.el
index 4cfa6cee4e..c40ccf161a 100644
--- a/hcel-outline.el
+++ b/hcel-outline.el
@@ -116,7 +116,7 @@ update in the outline mode too."
                         'package-id package-id
                         'module-path module
                         'folded t)))
-         (hcel-api-package-info package-id))))))
+         (hcel-list-modules (print package-id)))))))
 
 (defun hcel-outline-toggle-children ()
   (interactive)