summaryrefslogtreecommitdiff
path: root/guix/import/utils.scm
diff options
context:
space:
mode:
authorMarius Bakke <marius@gnu.org>2020-12-13 20:50:50 +0100
committerMarius Bakke <marius@gnu.org>2020-12-13 20:50:50 +0100
commitd13ed52da216ece35af8e4f4ae413eb05912794b (patch)
treea4313f1c21fb309ffea89be715be640376935cfb /guix/import/utils.scm
parentbdfdb9d79d83c806ea59a9bdd99b5a786d14999c (diff)
parenta7737f0ead2293536b9d0ba253de4673378a0ffa (diff)
Merge branch 'ungrafting' into staging
Diffstat (limited to 'guix/import/utils.scm')
-rw-r--r--guix/import/utils.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/import/utils.scm b/guix/import/utils.scm
index 7de95349cd..e227c2e42d 100644
--- a/guix/import/utils.scm
+++ b/guix/import/utils.scm
@@ -275,9 +275,9 @@ version. If APPEND-VERSION?/string is a string, append this string."
(cond
((string? append-version?/string)
(string-append name "-" append-version?/string))
- ((= append-version?/string #t)
+ ((eq? append-version?/string #t)
(string-append name "-" (version-major+minor version)))
- ((#t) version)))
+ (else name)))
,guix-package))))
(define (build-system-modules)