diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2019-06-08 15:46:30 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2019-08-26 15:56:33 +0200 |
| commit | 3c56d030335da3a43fa0ba2ff2f355d7696efbc8 (patch) | |
| tree | 411b7b9b310be9da9cd8f156f3ea13121e1c8138 /gnu/installer | |
| parent | d4d27ddb99280d6d77282ddc2f010c59bff0b665 (diff) | |
installer: Hide the Wi-Fi passphrase by default.
* gnu/installer/newt/wifi.scm (run-wifi-password-page):
Add an #:INPUT-VISIBILITY-CHECKBOX? to the input page.
Diffstat (limited to 'gnu/installer')
| -rw-r--r-- | gnu/installer/newt/wifi.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gnu/installer/newt/wifi.scm b/gnu/installer/newt/wifi.scm index 1cb2ef2df39..3fd5756b991 100644 --- a/gnu/installer/newt/wifi.scm +++ b/gnu/installer/newt/wifi.scm | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | ;;; GNU Guix --- Functional package management for GNU | 1 | ;;; GNU Guix --- Functional package management for GNU |
| 2 | ;;; Copyright © 2018 Mathieu Othacehe <m.othacehe@gmail.com> | 2 | ;;; Copyright © 2018 Mathieu Othacehe <m.othacehe@gmail.com> |
| 3 | ;;; Copyright © 2019 Meiyo Peng <meiyo@riseup.net> | 3 | ;;; Copyright © 2019 Meiyo Peng <meiyo@riseup.net> |
| 4 | ;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr> | ||
| 4 | ;;; | 5 | ;;; |
| 5 | ;;; This file is part of GNU Guix. | 6 | ;;; This file is part of GNU Guix. |
| 6 | ;;; | 7 | ;;; |
| @@ -88,7 +89,8 @@ nmc_wifi_strength_bars." | |||
| 88 | (define (run-wifi-password-page) | 89 | (define (run-wifi-password-page) |
| 89 | "Run a page prompting user for a password and return it." | 90 | "Run a page prompting user for a password and return it." |
| 90 | (run-input-page (G_ "Please enter the wifi password.") | 91 | (run-input-page (G_ "Please enter the wifi password.") |
| 91 | (G_ "Password required"))) | 92 | (G_ "Password required") |
| 93 | #:input-visibility-checkbox? #t)) | ||
| 92 | 94 | ||
| 93 | (define (run-wrong-password-page service-name) | 95 | (define (run-wrong-password-page service-name) |
| 94 | "Run a page to inform user of a wrong password input." | 96 | "Run a page to inform user of a wrong password input." |
