[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: profiles: manifest-lookup-package: Cosmetic changes.
From: |
Ricardo Wurmus |
Subject: |
01/01: profiles: manifest-lookup-package: Cosmetic changes. |
Date: |
Sun, 30 Oct 2016 06:23:04 +0000 (UTC) |
rekado pushed a commit to branch master
in repository guix.
commit 054f60cd31a300ac757c17ee5023710da3dd0ba5
Author: Ricardo Wurmus <address@hidden>
Date: Sun Oct 30 07:21:15 2016 +0100
profiles: manifest-lookup-package: Cosmetic changes.
* guix/profiles.scm (manifest-lookup-package): Rename variables; use
"string=?" instead of "equal?".
---
guix/profiles.scm | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/guix/profiles.scm b/guix/profiles.scm
index e7319a8..96f8b65 100644
--- a/guix/profiles.scm
+++ b/guix/profiles.scm
@@ -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))