From 892f1b7273d57b25940700877a02618fe826cc08 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Thu, 18 Nov 2021 22:44:26 +0100 Subject: services: Accept s in lieu of s. * gnu/services/authentication.scm (fprintd-configuration) (nslcd-configuration): Substitute file-like objects for package ones. * gnu/services/cgit.scm (cgit-configuration, opaque-cgit-configuration): Likewise. * gnu/services/cups.scm (package-list?, cups-configuration): Likewise. * gnu/services/dns.scm (verify-knot-configuration) (ddclient-configuration): Likewise. * gnu/services/docker.scm (docker-configuration): Likewise. * gnu/services/file-sharing.scm (transmission-daemon-configuration): Likewise. * gnu/services/getmail.scm (getmail-configuration): Likewise. * gnu/services/mail.scm (dovecot-configuration) (opaque-dovecot-configuration): Likewise. * gnu/services/messaging.scm (prosody-configuration) (opaque-prosody-configuration): Likewise. * gnu/services/monitoring.scm (zabbix-server-configuration) (zabbix-agent-configuration): Likewise. * gnu/services/networking.scm (opendht-configuration): Likewise. * gnu/services/pm.scm (tlp-configuration): Likewise. * gnu/services/telephony.scm (jami-configuration): Likewise. * gnu/services/virtualization.scm (libvirt-configuration) (qemu-guest-agent-configuration): Likewise. * gnu/services/vpn.scm (openvpn-client-configuration): Likewise. --- gnu/services/networking.scm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'gnu/services/networking.scm') diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm index 7e310b70ec..77841a18d4 100644 --- a/gnu/services/networking.scm +++ b/gnu/services/networking.scm @@ -311,7 +311,7 @@ Protocol (DHCP) client, on all the non-loopback network interfaces."))) (define-record-type* dhcpd-configuration make-dhcpd-configuration dhcpd-configuration? - (package dhcpd-configuration-package ; + (package dhcpd-configuration-package ;file-like (default isc-dhcp)) (config-file dhcpd-configuration-config-file ;file-like (default #f)) @@ -743,7 +743,7 @@ demand."))) ;;; can evaluate: (configuration->documentation 'opendht-configuration) (define-configuration/no-serialization opendht-configuration (opendht - (package opendht) + (file-like opendht) "The @code{opendht} package to use.") (peer-discovery? (boolean #false) @@ -1149,7 +1149,7 @@ and @command{wicd-curses} user interfaces." (default network-manager)) (dns network-manager-configuration-dns (default "default")) - (vpn-plugins network-manager-configuration-vpn-plugins ;list of + (vpn-plugins network-manager-configuration-vpn-plugins ;list of file-like (default '()))) (define network-manager-activation @@ -1452,7 +1452,7 @@ whatever the thing is supposed to do)."))) (define-record-type* wpa-supplicant-configuration make-wpa-supplicant-configuration wpa-supplicant-configuration? - (wpa-supplicant wpa-supplicant-configuration-wpa-supplicant ; + (wpa-supplicant wpa-supplicant-configuration-wpa-supplicant ;file-like (default wpa-supplicant)) (requirement wpa-supplicant-configuration-requirement ;list of symbols (default '(user-processes loopback syslogd))) @@ -2124,7 +2124,7 @@ of the IPFS peer-to-peer storage network."))) (define-record-type* keepalived-configuration make-keepalived-configuration keepalived-configuration? - (keepalived keepalived-configuration-keepalived ; + (keepalived keepalived-configuration-keepalived ;file-like (default keepalived)) (config-file keepalived-configuration-config-file ;file-like (default #f))) -- cgit v1.2.3