~ruther/guix-local: gnu: fail2ban: Move file deletion to source snippet.

f744f060ddaccb4432fab3ff021b3ab8302c0b3e — Nicolas Graves 1 year, 2 months ago 5dccf87

gnu: fail2ban: Move file deletion to source snippet.

* 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>

patch browse .tar.gz .zip

1 files changed, 9 insertions(+), 8 deletions(-)

M gnu/packages/admin.scm

M gnu/packages/admin.scm => gnu/packages/admin.scm +9 -8

@@ 6185,6 6185,15 @@ alias cysdig=sudo csysdig --modern-bpf
               (modules '((guix build utils)))
               (snippet
                '(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.
                   (substitute* "setup.py"
                     (("/etc/fail2ban")


@@ 6248,14 6257,6 @@ alias cysdig=sudo csysdig --modern-bpf
                     (lambda* (#:key inputs #:allow-other-keys)
                       ;; deleting things that are not feasible to fix
                       ;; 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"
                         (for-each delete-file
                                   '("apf.conf"