tests: Use the right identifier in tests/elpa.scm.
* tests/elpa.scm: Change 'nil->empty' to 'ensure-list' in the whole file.
This commit is contained in:
parent
840bd1d358
commit
80ea7526db
@ -53,8 +53,8 @@ information about package NAME. (Function 'elpa-package-info'.)"
|
|||||||
(define package-source-url
|
(define package-source-url
|
||||||
(@@ (guix import elpa) package-source-url))
|
(@@ (guix import elpa) package-source-url))
|
||||||
|
|
||||||
(define nil->empty
|
(define ensure-list
|
||||||
(@@ (guix import elpa) nil->empty))
|
(@@ (guix import elpa) ensure-list))
|
||||||
|
|
||||||
(define package-home-page
|
(define package-home-page
|
||||||
(@@ (guix import elpa) package-home-page))
|
(@@ (guix import elpa) package-home-page))
|
||||||
@ -76,7 +76,7 @@ information about package NAME. (Function 'elpa-package-info'.)"
|
|||||||
(ver (elpa-version->string version))
|
(ver (elpa-version->string version))
|
||||||
(url (package-source-url kind name ver repo)))
|
(url (package-source-url kind name ver repo)))
|
||||||
(make-elpa-package name ver
|
(make-elpa-package name ver
|
||||||
(nil->empty reqs) synopsis kind
|
(ensure-list reqs) synopsis kind
|
||||||
(package-home-page (first rest))
|
(package-home-page (first rest))
|
||||||
auctex-readme-mock
|
auctex-readme-mock
|
||||||
url)))
|
url)))
|
||||||
|
Loading…
Reference in New Issue
Block a user