diff options
| author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2020-10-19 12:51:57 -0400 |
|---|---|---|
| committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2020-10-19 13:11:40 -0400 |
| commit | 5e2140511c1ad9ccd731438b74d61b62111da1e6 (patch) | |
| tree | a4ff748ad26e121b88469b5d921001ef1382be8f /etc/committer.scm.in | |
| parent | 9e3a5ee417ea7fe9721be8804ff047e80c4f22ed (diff) | |
| parent | 353bdae32f72b720c7ddd706576ccc40e2b43f95 (diff) | |
| download | guix-5e2140511c1ad9ccd731438b74d61b62111da1e6.tar.gz | |
Merge branch 'staging'
Conflicts: gnu/packages/admin.scm gnu/packages/commencement.scm gnu/packages/gdb.scm gnu/packages/llvm.scm gnu/packages/package-management.scm gnu/packages/tls.scm
Diffstat (limited to 'etc/committer.scm.in')
| -rwxr-xr-x | etc/committer.scm.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/etc/committer.scm.in b/etc/committer.scm.in index 2f247835f3..ebe6b96bcc 100755 --- a/etc/committer.scm.in +++ b/etc/committer.scm.in @@ -175,8 +175,8 @@ corresponding to the top-level definition containing the staged changes." (let ((old-values (get-values old field)) (new-values (get-values new field))) (or (equal? old-values new-values) - (let ((removed (lset-difference eq? old-values new-values)) - (added (lset-difference eq? new-values old-values))) + (let ((removed (lset-difference equal? old-values new-values)) + (added (lset-difference equal? new-values old-values))) (format port "[~a]: ~a~%" field (match (list (map symbol->string removed) |