diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2019-07-31 14:28:56 +0200 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2019-07-31 14:28:56 +0200 |
| commit | 6a2e54236e1b2c428c8fd478ee0f3bd8130703fa (patch) | |
| tree | af70155a2f474d35d90d003f8584b2d9ee0bbaa8 /guix/import/stackage.scm | |
| parent | 2cf1e37c109c8d03fae75bc84f7012f3afa956e5 (diff) | |
| parent | 3d88855dfdcc4c8ce11f494fdf9f0ac1d8eef530 (diff) | |
| download | guix-patches-6a2e54236e1b2c428c8fd478ee0f3bd8130703fa.tar guix-patches-6a2e54236e1b2c428c8fd478ee0f3bd8130703fa.tar.gz | |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/import/stackage.scm')
| -rw-r--r-- | guix/import/stackage.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/import/stackage.scm b/guix/import/stackage.scm index 1c1e73a723..194bea633e 100644 --- a/guix/import/stackage.scm +++ b/guix/import/stackage.scm @@ -60,7 +60,7 @@ (let* ((url (if (string=? "" version) (string-append %stackage-url "/lts") (string-append %stackage-url "/lts-" version))) - (lts-info (json-fetch-alist url))) + (lts-info (json-fetch url))) (if lts-info (reverse lts-info) (leave-with-message "LTS release version not found: ~a" version)))))) @@ -74,7 +74,7 @@ (define (lts-package-version pkgs-info name) "Return the version of the package with upstream NAME included in PKGS-INFO." (let ((pkg (find (lambda (pkg) (string=? (stackage-package-name pkg) name)) - pkgs-info))) + (vector->list pkgs-info)))) (stackage-package-version pkg))) |