mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
avahi: Fix exception when #:timeout is #f.
* guix/avahi.scm (avahi-publish-service-thread): Fixes crash when timeout is #f, which is the default for "guix publish --advertise" Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
7d9fdfb19d
commit
9cf2f08852
1 changed files with 3 additions and 1 deletions
|
@ -84,7 +84,9 @@ (define client-callback
|
|||
client-flag/ignore-user-config)
|
||||
client-callback)))
|
||||
(while (not (stop-loop?))
|
||||
(iterate-simple-poll poll timeout))))))
|
||||
(if timeout
|
||||
(iterate-simple-poll poll timeout)
|
||||
(iterate-simple-poll poll)))))))
|
||||
|
||||
(define (interface->ip-address interface)
|
||||
"Return the local IP address of the given INTERFACE."
|
||||
|
|
Loading…
Reference in a new issue