TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki 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
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
guix/profiles.scm
View file

@ -490,12 +490,12 @@ (define (find-among-inputs inputs)
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))