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

services: ddclient: Fix unrecognized keywords.

Browse source 
This patch fixes warnings about unrecognized keywords in logs.

* gnu/services/dns.scm (serialize-field): Skip some field names.
This commit is contained in:
Oleg Pykhalov 2018-12-04 07:08:47 +03:00
parent 191c439e79
commit 9325533bd0
No known key found for this signature in database
GPG key ID: 167F8EA5001AFA9C
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
gnu/services/dns.scm
View file

@ -684,7 +684,8 @@ (define (uglify-field-name field-name)
(string-delete #\? (symbol->string field-name))) (string-delete #\? (symbol->string field-name)))
(define (serialize-field field-name val) (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) (define (serialize-boolean field-name val)
(serialize-field field-name (if val "yes" "no"))) (serialize-field field-name (if val "yes" "no")))