diff --git a/gnu/packages/python.scm b/gnu/packages/python.scm index 74af5b3445..0ec790223e 100644 --- a/gnu/packages/python.scm +++ b/gnu/packages/python.scm @@ -26,7 +26,7 @@ ;;; Copyright © 2016, 2017 Nikita ;;; Copyright © 2016 Dylan Jeffers ;;; Copyright © 2016 David Craven -;;; Copyright © 2016, 2017, 2018, 2019, 2020 Marius Bakke +;;; Copyright © 2016, 2017, 2018, 2019, 2020, 2021 Marius Bakke ;;; Copyright © 2016, 2017 Stefan Reichör ;;; Copyright © 2016 Dylan Jeffers ;;; Copyright © 2016, 2017 Alex Vong @@ -502,7 +502,8 @@ data types.") ;; Delete .exe from embedded .whl (zip) files (for-each (lambda (whl) - (let ((dir "whl-content")) + (let ((dir "whl-content") + (circa-1980 (* 10 366 24 60 60))) (mkdir-p dir) (with-directory-excursion dir (let ((whl (string-append "../" whl))) @@ -510,8 +511,13 @@ data types.") (for-each delete-file (find-files "." "\\.exe$")) (delete-file whl) + ;; Reset timestamps to prevent them from ending + ;; up in the Zip archive. + (ftw "." (lambda (file stat flag) + (utime file circa-1980 circa-1980) + #t)) (apply invoke "zip" "-X" whl - (find-files "." ".*" #:directories? #t)))) + (find-files "." #:directories? #t)))) (delete-file-recursively dir))) (find-files "Lib/ensurepip" "\\.whl$")))) (add-before 'check 'set-TZDIR