03/04: gnu: network-manager: Patch modprobe file name.

[guix-commits]

apteryx pushed a commit to branch master
in repository guix.

commit e682932636f1f35733872d69edc9bf9d9813c03a
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Thu Mar 23 16:01:17 2023 -0400

    gnu: network-manager: Patch modprobe file name.
    
    Partially fixes <https://issues.guix.gnu.org/62409>.
    
    * gnu/packages/gnome.scm (network-manager)
    [arguments]: Add patch-modprobe-path phase.
    [inputs]: Add kmod.
---
 gnu/packages/gnome.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index dc005e09b6..aa8525b100 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -8544,6 +8544,14 @@ users.")
                                                          "/sbin/dhclient")))
       #:phases
       #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-modprobe-path
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "src/libnm-platform/nm-platform-utils.c"
+                ;; The modprobe command location is not configurable (see:
+                ;; https://gitlab.freedesktop.org/NetworkManager/
+                ;; NetworkManager/-/issues/1257).
+                (("/sbin/modprobe")
+                 (search-input-file inputs "bin/modprobe")))))
           (add-after 'unpack 'patch-dlopen-call-to-libjansson.so
             (lambda* (#:key inputs #:allow-other-keys)
               (substitute* "src/libnm-glib-aux/nm-json-aux.c"
@@ -8623,6 +8631,7 @@ users.")
            isc-dhcp
            iwd                          ;wpa_supplicant alternative
            jansson
+           kmod
            libgcrypt
            libgudev
            libndp