diff options
| -rw-r--r-- | gnu/installer/newt/keymap.scm | 2 | ||||
| -rw-r--r-- | gnu/installer/newt/network.scm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/gnu/installer/newt/keymap.scm b/gnu/installer/newt/keymap.scm index 0c38a79e19..4bdae51340 100644 --- a/gnu/installer/newt/keymap.scm +++ b/gnu/installer/newt/keymap.scm @@ -81,7 +81,7 @@ names of the selected keyboard layout and variant." (installer-step (id 'variant) (compute - (lambda (result) + (lambda (result _) (let ((variants (x11-keymap-layout-variants (result-step result 'layout)))) (run-variant-page variants diff --git a/gnu/installer/newt/network.scm b/gnu/installer/newt/network.scm index 45989ac2ac..4912959147 100644 --- a/gnu/installer/newt/network.scm +++ b/gnu/installer/newt/network.scm @@ -131,7 +131,7 @@ Internet." (installer-step (id 'power-technology) (compute - (lambda (result) + (lambda (result _) (let ((technology (result-step result 'select-technology))) (connman-enable-technology technology) (wait-technology-powered technology))))) @@ -140,7 +140,7 @@ Internet." (installer-step (id 'connect-service) (compute - (lambda (result) + (lambda (result _) (let* ((technology (result-step result 'select-technology)) (type (technology-type technology))) (cond |