bricewge pushed a commit to branch master
in repository guix.
commit ea55e1355bb3d45d5f04e7cb390d2c6afa8e68e6
Author: Brice Waegeneire <br...@waegenei.re>
AuthorDate: Thu Jun 4 16:14:01 2020 +0200
services: dnsmasq: Extend 'activation-service'.
* gnu/services/dns.scm (dnsmasq-activation): New procedure …
(dnsmasq-service-type): … use it.
---
gnu/services/dns.scm | 10 +++++++++-
1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/gnu/services/dns.scm b/gnu/services/dns.scm
index 55211cb..aeb2bfd 100644
--- a/gnu/services/dns.scm
+++ b/gnu/services/dns.scm
@@ -861,12 +861,20 @@ cache.size = 100 * MB
#:pid-file "/run/dnsmasq.pid"))
(stop #~(make-kill-destructor))))))
+(define (dnsmasq-activation config)
+ #~(begin
+ (use-modules (guix build utils))
+ ;; create directory to store dnsmasq lease file
+ (mkdir-p "/var/lib/misc")))
+
(define dnsmasq-service-type
(service-type
(name 'dnsmasq)
(extensions
(list (service-extension shepherd-root-service-type
- (compose list dnsmasq-shepherd-service))))
+ (compose list dnsmasq-shepherd-service))
+ (service-extension activation-service-type
+ dnsmasq-activation)))
(default-value (dnsmasq-configuration))
(description "Run the dnsmasq DNS server.")))
