3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00

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?'.
This commit is contained in:
Mark H Weaver 2018-03-18 00:27:41 -04:00
parent 1e62645402
commit 171a117c61
No known key found for this signature in database
GPG key ID: 7CEF29847562C516

View file

@ -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)