Subject: bug#46305: closed (Re: [bug#46305] [PATCH] gnu: miredo: Fix creation of .pid file.)

From: [email-masked] (GNU bug Tracking System)
Date: Thu, 11 Feb 2021 09:20:01 +0000

Your bug report

#46305: [PATCH] gnu: miredo: Fix creation of .pid file.

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
46305: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=46305
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: [bug#46305] [PATCH] gnu: miredo: Fix creation of .pid file.
From: 宋文武 <[email-masked]>
To: Léo Le Bouter <[email-masked]>
Cc: [email-masked]
Date: Thu, 11 Feb 2021 17:20:58 +0800
List-Id: <debbugs-submit.debbugs.gnu.org>

Léo Le Bouter <[email-masked]> writes:

> * gnu/packages/networking.scm (miredo)[arguments]: Add "--localstatedir=/var"
> to #:configure-flags and add 'do-not-create-/run phase to #:phases to remove
> code that tries to create a directory inside "@localstatedir@" during install.

Pushed, thank you!

Subject: [PATCH] gnu: miredo: Fix creation of .pid file.
From: Léo Le Bouter <[email-masked]>
To: [email-masked]
Cc: Léo Le Bouter <[email-masked]>
Date: Thu, 4 Feb 2021 23:33:53 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

* gnu/packages/networking.scm (miredo)[arguments]: Add "--localstatedir=/var"
to #:configure-flags and add 'do-not-create-/run phase to #:phases to remove
code that tries to create a directory inside "@localstatedir@" during install.
---
 gnu/packages/networking.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm
index abaab60f31..5e0022ac76 100644
--- a/gnu/packages/networking.scm
+++ b/gnu/packages/networking.scm
@@ -700,8 +700,16 @@ or, more generally, MAC addresses of the same category of hardware.")
                 "0j9ilig570snbmj48230hf7ms8kvcwi2wblycqrmhh85lksd49ps"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:phases
+     '(#:configure-flags
+       (list "--localstatedir=/var")
+       #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'do-not-create-/run
+           (lambda _
+             (substitute* (find-files "src" "Makefile.*")
+               (("^.+install_sh.+/run.+$")
+                "\ttrue"))
+             #t))
          (add-after 'unpack 'patch-iproute2
            (lambda* (#:key inputs #:allow-other-keys)
              (let* ((iproute (assoc-ref inputs "iproute"))
-- 
2.30.0