mirror/guix
mirror/guix
1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-14 19:10:49 +02:00
Code Releases Activity

gnu: fail2ban: Move file deletion to source snippet.

Browse source 
* gnu/packages/admin.scm (fail2ban)
  [arguments]<phases>: Move multiple file deletion from here...
  [source]<snippet>: ...to here.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Nicolas Graves 2025-05-04 10:56:21 +02:00 • committed by Ludovic Courtès
parent 5dccf8781c
commit f744f060dd
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 9 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

17
gnu/packages/admin.scm
View file

@ -6185,6 +6185,15 @@ alias cysdig=sudo csysdig --modern-bpf
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(begin '(begin
;; Replacing those by our own paths-guix.conf
(with-directory-excursion "config"
(for-each delete-file
'("paths-arch.conf"
"paths-debian.conf"
"paths-fedora.conf"
"paths-freebsd.conf"
"paths-opensuse.conf"
"paths-osx.conf")))
;; Get rid of absolute file names. ;; Get rid of absolute file names.
(substitute* "setup.py" (substitute* "setup.py"
(("/etc/fail2ban") (("/etc/fail2ban")
@ -6248,14 +6257,6 @@ alias cysdig=sudo csysdig --modern-bpf
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
;; deleting things that are not feasible to fix ;; deleting things that are not feasible to fix
;; or won't be used any way ;; or won't be used any way
(with-directory-excursion "config"
(for-each delete-file
'("paths-arch.conf"
"paths-debian.conf"
"paths-fedora.conf"
"paths-freebsd.conf"
"paths-opensuse.conf"
"paths-osx.conf")))
(with-directory-excursion "config/action.d" (with-directory-excursion "config/action.d"
(for-each delete-file (for-each delete-file
'("apf.conf" '("apf.conf"