1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

packages: Add 'package-unique-version-prefix'.

* gnu/packages.scm (package-unique-version-prefix): New procedure.
* guix/scripts/package.scm (manifest-entry-version-prefix): Use it.
* tests/packages.scm ("package-unique-version-prefix, gcc@8")
("package-unique-version-prefix, grep"): New tests.
This commit is contained in:
Ludovic Courtès
2022-03-14 18:20:31 +01:00
parent 4b451813f7
commit f54f2aa9df
3 changed files with 36 additions and 18 deletions

View File

@@ -1923,6 +1923,19 @@
(package-location (specification->package "guile@2"))
(specification->location "guile@2"))
(test-equal "package-unique-version-prefix, gcc@8"
"8"
(let ((gcc (specification->package "gcc-toolchain@8")))
(package-unique-version-prefix (package-name gcc)
(package-version gcc))))
(test-equal "package-unique-version-prefix, grep"
""
(let ((grep (specification->package "grep")))
(package-unique-version-prefix (package-name grep)
(package-version grep))))
(test-eq "this-package-input, exists"
hello
(package-arguments