Browse Source

packages: Add all non-derivation paths to the store.

* guix/packages.scm (package-derivation): Add all non-derivation paths
  to the store.
gn-latest-20200428
Ludovic Courtès 8 years ago
parent
commit
93a0a8b3fd
1 changed files with 5 additions and 5 deletions
  1. +5
    -5
      guix/packages.scm

+ 5
- 5
guix/packages.scm View File

@@ -200,13 +200,13 @@ with their propagated inputs, recursively."
(list name (package-derivation store package)
sub-drv))
(((? string? name)
(and (? string?) (? store-path?) drv))
;; Both derivation and output paths. The latter
;; can be files already in the store.
(and (? string?) (? derivation-path?) drv))
(list name drv))
(((? string? name)
(and (? string?) (? (negate store-path?))
(? file-exists? file)))
(and (? string?) (? file-exists? file)))
;; Add FILE to the store. When FILE is in the
;; sub-directory of a store path, it needs to be
;; added anyway, so it can be used as a source.
(list name
(add-to-store store (basename file)
#t #f "sha256" file))))


Loading…
Cancel
Save