profiles: manifest-lookup-package: Cosmetic changes.
* guix/profiles.scm (manifest-lookup-package): Rename variables; use "string=?" instead of "equal?".
This commit is contained in:
parent
e3c1311a5d
commit
054f60cd31
|
@ -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))
|
||||
|
||||
|
|
Loading…
Reference in New Issue