futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: wpa-supplicant: Install DBus service file.

Browse Source 
* gnu/packages/admin.scm (wpa-supplicant)[arguments]: In
'install-dbus-conf' phase, install DBus service file for
dbus-system-services-builder to find.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Roman Riabenko 2022-05-28 18:36:48 +03:00 committed by Ludovic Courtès
parent f697dd94c4
commit 544a886ae1
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gnu/packages/admin.scm
View File

@ -48,6 +48,7 @@
;;; Copyright © 2021 Petr Hodina <phodina@protonmail.com>
;;; Copyright © 2021 Artyom V. Poptsov <poptsov.artyom@gmail.com>
;;; Copyright © 2022 Wamm K. D. <jaft.r@outlook.com>
;;; Copyright © 2022 Roman Riabenko <roman@riabenko.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -2036,10 +2037,16 @@ command.")
(add-after 'install-documentation 'install-dbus-conf
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(dir (string-append out "/etc/dbus-1/system.d")))
(mkdir-p dir)
(interfaces (string-append out "/etc/dbus-1/system.d"))
(services (string-append out
"/share/dbus-1/system-services")))
(mkdir-p interfaces)
(copy-file "dbus/dbus-wpa_supplicant.conf"
(string-append dir "/wpa_supplicant.conf")))
(string-append interfaces "/wpa_supplicant.conf"))
(mkdir-p services)
(copy-file "dbus/fi.w1.wpa_supplicant1.service"
(string-append services
"/fi.w1.wpa_supplicant1.service")))
#t))))))))
(define-public wpa-supplicant-gui