From 171a117c61224be10f2b97a6a880ad0f4c38ef6d Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Sun, 18 Mar 2018 00:27:41 -0400 Subject: 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(-) (limited to 'guix/build/python-build-system.scm') diff --git a/guix/build/python-build-system.scm b/guix/build/python-build-system.scm index c903a0031e..376ea81f1a 100644 --- a/guix/build/python-build-system.scm +++ b/guix/build/python-build-system.scm @@ -141,7 +141,7 @@ (define* (check #:key tests? test-target use-setuptools? #:allow-other-keys) (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) -- cgit v1.2.3