gnu: iwd: Patch resolvconf path.

* gnu/packages/networking.scm (iwd)[inputs]: Add openresolv.
[arguments]<#:phases>: Add 'patch-resolvconf-path.

Change-Id: Ica59a76dd6318e06979314e4b49c5371f4c98e4d
This commit is contained in:
Hilton Chain 2023-10-28 11:55:24 +08:00
parent 17a942d643
commit 551d013a56
No known key found for this signature in database
GPG key ID: ACC66D09CA528292

View file

@ -113,6 +113,7 @@ (define-module (gnu packages networking)
#:use-module (gnu packages curl)
#:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages dejagnu)
#:use-module (gnu packages dns)
#:use-module (gnu packages docbook)
#:use-module (gnu packages documentation)
#:use-module (gnu packages flex)
@ -4066,7 +4067,7 @@ (define-public iwd
"199pcs20054xhp5c0dnxf9ny5cf5cynkqpx68dpn46nq8ly76n2y"))))
(build-system gnu-build-system)
(inputs
(list dbus ell (package-source ell) readline))
(list dbus ell (package-source ell) openresolv readline))
(native-inputs
(list autoconf
automake
@ -4102,6 +4103,13 @@ (define-public iwd
(copy-file (string-append ell-header-dir "/" file-name)
(string-append target-dir "/" file-name)))
'("asn1-private.h" "useful.h")))))
(add-after 'unpack 'patch-resolvconf-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/resolve.c"
(("getenv\\(\"PATH\"\\)")
(format #f "\"~a\""
(dirname (search-input-file
inputs "sbin/resolvconf")))))))
(add-after 'configure 'patch-Makefile
(lambda _
(substitute* "Makefile"