tribes/guix
1
0
Fork 1
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-30 22:35:57 +02:00
Code Activity

profiles: manifest-lookup-package: Cosmetic changes.

Browse Source 
* guix/profiles.scm (manifest-lookup-package): Rename variables; use
"string=?" instead of "equal?".
This commit is contained in:
Ricardo Wurmus
2016-10-30 07:21:15 +01:00
parent e3c1311a5d
commit 054f60cd31
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
guix/profiles.scm
+3 -3
View File
@@ -490,12 +490,12 @@ if not found."
inputs))
(define (find-among-store-items items)
(find (lambda (item)
(let-values (((pkg-name pkg-version)
(let-values (((name* version*)
(package-name->name+version
(store-path-package-name item))))
(and (equal? name pkg-name)
(and (string=? name name*)
(if version
(string-prefix? version pkg-version)
(string-prefix? version version*)
#t))))
items))