ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 05:48:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: avahi: Publish '_workstation._tcp' by default.

Browse source 
This reverts to the behavior of avahi-daemon prior to Avahi 0.7 (commit
550f4509ac).

* gnu/services/avahi.scm (<avahi-configuration>)[publish-workstation?]:
New field.
(configuration-file): Honor it.
This commit is contained in:
Ludovic Courtès 2018-02-18 23:26:23 +01:00
parent ad7a807d84
commit 37084ba561
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/services/avahi.scm
View file

@ -47,6 +47,12 @@ (define-record-type* <avahi-configuration>
(default #f))
(host-name avahi-configuration-host-name) ;string
(publish? avahi-configuration-publish?) ;Boolean
;; The default for this was #t in Avahi 0.6.31 and became #f in 0.7. For
;; now we stick to the old default.
(publish-workstation? avahi-configuration-publish-workstation? ;Boolean
(default #t))
(ipv4? avahi-configuration-ipv4?) ;Boolean
(ipv6? avahi-configuration-ipv6?) ;Boolean
(wide-area? avahi-configuration-wide-area?) ;Boolean
@ -77,7 +83,9 @@ (define host-name (avahi-configuration-host-name config))
"enable-wide-area=" (bool (avahi-configuration-wide-area? config))
"[publish]\n"
"disable-publishing="
(bool (not (avahi-configuration-publish? config))))))
(bool (not (avahi-configuration-publish? config)))
"publish-workstation="
(bool (avahi-configuration-publish-workstation? config)))))
(define %avahi-accounts
;; Account and group for the Avahi daemon.