aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorAndrew Tropin <andrew@trop.in>2023-03-20 12:08:36 +0400
committerAndrew Tropin <andrew@trop.in>2023-03-20 12:08:36 +0400
commit3a2200e1ad2049ad7e25295e6b4e013f74dd84e2 (patch)
tree7983d41944e2831490c73e16d5963be66e55f237 /gnu
parent1f36534c7e8f2325bff4df5d37ecc811dc63fc38 (diff)
downloadguix-3a2200e1ad2049ad7e25295e6b4e013f74dd84e2.tar.gz
guix-3a2200e1ad2049ad7e25295e6b4e013f74dd84e2.zip
services: network-manager: Add missing shadowing of 'iwd?' field.
* gnu/services/networking.scm (network-manager-shepherd-service): Add missing shadowing of 'iwd?' field by using let* instead of let.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/services/networking.scm16
1 files changed, 8 insertions, 8 deletions
diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm
index 5c6ad4ce3b..4632498357 100644
--- a/gnu/services/networking.scm
+++ b/gnu/services/networking.scm
@@ -1219,14 +1219,14 @@ project's documentation} for more information."
(define (network-manager-shepherd-service config)
(match-record config <network-manager-configuration>
(network-manager shepherd-requirement dns vpn-plugins iwd?)
- (let ((iwd? (or iwd? ; TODO: deprecated field, remove later.
- (and shepherd-requirement
- (memq 'iwd shepherd-requirement))))
- (conf (plain-file "NetworkManager.conf"
- (string-append
- "[main]\ndns=" dns "\n"
- (if iwd? "[device]\nwifi.backend=iwd\n" ""))))
- (vpn (vpn-plugin-directory vpn-plugins)))
+ (let* ((iwd? (or iwd? ; TODO: deprecated field, remove later.
+ (and shepherd-requirement
+ (memq 'iwd shepherd-requirement))))
+ (conf (plain-file "NetworkManager.conf"
+ (string-append
+ "[main]\ndns=" dns "\n"
+ (if iwd? "[device]\nwifi.backend=iwd\n" ""))))
+ (vpn (vpn-plugin-directory vpn-plugins)))
(list (shepherd-service
(documentation "Run the NetworkManager.")
(provision '(NetworkManager networking))