diff options
Diffstat (limited to 'guix/avahi.scm')
| -rw-r--r-- | guix/avahi.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/avahi.scm b/guix/avahi.scm index 502b0b9dcd..574fe0b850 100644 --- a/guix/avahi.scm +++ b/guix/avahi.scm @@ -84,7 +84,9 @@ when STOP-LOOP? procedure returns true." 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." |