diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2023-05-04 12:31:41 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2023-05-04 13:09:00 +0200 |
| commit | 124b921a5e18859d44596706e285ee5c1cc184af (patch) | |
| tree | 1b41c214924a2fddaad69ffff1a91ec34b41d0fd | |
| parent | 39eb9b5a5cc1ea1224609ea20eaaaf3972c280f0 (diff) | |
import: Cosmetic tweaks to 'recursive-import'.
* guix/import/utils.scm (recursive-import): Tweak docstring. Simplify
'apply' call.
| -rw-r--r-- | guix/import/utils.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/import/utils.scm b/guix/import/utils.scm index e1f6519287..177817b10c 100644 --- a/guix/import/utils.scm +++ b/guix/import/utils.scm @@ -607,7 +607,7 @@ obtain a node's uniquely identifying \"key\"." #:allow-other-keys #:rest rest) "Return a list of package expressions for PACKAGE-NAME and all its dependencies, sorted in topological order. For each package, -call (REPO->GUIX-PACKAGE NAME :KEYS version), which should return a +call (REPO->GUIX-PACKAGE NAME #:version V), which should return a package expression and a list of dependencies; call (GUIX-NAME PACKAGE-NAME) to obtain the Guix package name corresponding to the upstream name." (define-record-type <node> @@ -627,7 +627,7 @@ to obtain the Guix package name corresponding to the upstream name." ((#:version v . more) more) (_ post))) (args (append pre (list #:version version) post*)) - (package dependencies (apply repo->guix-package (cons* name args))) + (package dependencies (apply repo->guix-package name args)) (normalized-deps (map (match-lambda ((name version) (list name version)) (name (list name #f))) dependencies))) |