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

gnu: borg: Update the list of Cython-generated files to delete.

Reported by: Efraim Flashner <efraim@flashner.co.il>

* gnu/packages/backup.scm (borg)[source]: Update the snippet.
This commit is contained in:
Leo Famulari 2018-07-19 14:08:58 -04:00
parent c69d11c593
commit 5a3bf25526
No known key found for this signature in database
GPG key ID: 2646FA30BACA7F08

View file

@ -485,8 +485,21 @@ detection, and lossless compression.")
(modules '((guix build utils)))
(snippet
'(begin
;; Delete files generated by Cython. We used to have a regex
;; that created the list of generated files but Borg has
;; added new non-generated C files that cause the regex to
;; generate the wrong list.
(for-each delete-file
(find-files "borg" "^(c|h|p).*\\.c$"))
'("src/borg/algorithms/checksums.c"
"src/borg/chunker.c"
"src/borg/compress.c"
"src/borg/crypto/low_level.c"
"src/borg/hashindex.c"
"src/borg/item.c"
"src/borg/platform/darwin.c"
"src/borg/platform/freebsd.c"
"src/borg/platform/linux.c"
"src/borg/platform/posix.c"))
;; Remove bundled shared libraries.
(with-directory-excursion "src/borg/algorithms"
(for-each delete-file-recursively