guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

04/04: build-system/python: Fix deletion of .egg-info dirs created by te


From: Mark H. Weaver
Subject: 04/04: build-system/python: Fix deletion of .egg-info dirs created by tests.
Date: Sun, 18 Mar 2018 00:50:04 -0400 (EDT)

mhw pushed a commit to branch core-updates
in repository guix.

commit 171a117c61224be10f2b97a6a880ad0f4c38ef6d
Author: Mark H Weaver <address@hidden>
Date:   Sun Mar 18 00:27:41 2018 -0400

    build-system/python: Fix deletion of .egg-info dirs created by tests.
    
    * guix/build/python-build-system.scm (check): Use 'string=?' to compare
    strings, not 'eqv?'.
---
 guix/build/python-build-system.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/build/python-build-system.scm 
b/guix/build/python-build-system.scm
index c903a00..376ea81 100644
--- a/guix/build/python-build-system.scm
+++ b/guix/build/python-build-system.scm
@@ -141,7 +141,7 @@
       (let ((before (find-files "build" "\\.egg-info$" #:directories? #t)))
         (call-setuppy test-target '() use-setuptools?)
         (let* ((after (find-files "build" "\\.egg-info$" #:directories? #t))
-               (inter (lset-difference eqv? after before)))
+               (inter (lset-difference string=? after before)))
           (for-each delete-file-recursively inter)))
       (format #t "test suite not run~%"))
   #t)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]