diff options
| author | Oleg Pykhalov <go.wigust@gmail.com> | 2018-12-04 07:08:47 +0300 |
|---|---|---|
| committer | Oleg Pykhalov <go.wigust@gmail.com> | 2018-12-04 07:16:00 +0300 |
| commit | 9325533bd009070f2f4a98362ce1d3afd9af060c (patch) | |
| tree | e7c4ede308148df133f2cd846ca2e3e3c79e747e | |
| parent | 191c439e79bff677fa5616b6f8675261073ce991 (diff) | |
| download | gnu-guix-9325533bd009070f2f4a98362ce1d3afd9af060c.tar gnu-guix-9325533bd009070f2f4a98362ce1d3afd9af060c.tar.gz | |
services: ddclient: Fix unrecognized keywords.
This patch fixes warnings about unrecognized keywords in logs.
* gnu/services/dns.scm (serialize-field): Skip some field names.
| -rw-r--r-- | gnu/services/dns.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/services/dns.scm b/gnu/services/dns.scm index 24ef886682..1ef754b360 100644 --- a/gnu/services/dns.scm +++ b/gnu/services/dns.scm @@ -684,7 +684,8 @@ (string-delete #\? (symbol->string field-name))) (define (serialize-field field-name val) - (format #t "~a=~a\n" (uglify-field-name field-name) val)) + (when (not (member field-name '(group secret-file user))) + (format #t "~a=~a\n" (uglify-field-name field-name) val))) (define (serialize-boolean field-name val) (serialize-field field-name (if val "yes" "no"))) |