diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-05-14 11:57:55 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-05-14 12:11:04 +0200 |
| commit | ef250707d3303d58ae00fe8f461701e7fa788d8a (patch) | |
| tree | 5fe9638a8859567b052bdd15966c3e66f09ba246 /gnu/installer/newt/user.scm | |
| parent | 50867421f91e16aab6d66a1c1707d32434273c50 (diff) | |
| download | guix-ef250707d3303d58ae00fe8f461701e7fa788d8a.tar guix-ef250707d3303d58ae00fe8f461701e7fa788d8a.tar.gz | |
installer: Allow for arbitrary long passphrases and passwords.
Fixes <https://bugs.gnu.org/35716>.
Reported by sirmacik <sirmacik@wioo.waw.pl>.
* gnu/installer/newt/page.scm (run-input-page): Add FLAG-SCROLL to
INPUT-FLAGS*.
* gnu/installer/newt/user.scm (run-user-add-page): Add FLAG-SCROLL to
ENTRY-PASSWORD.
Diffstat (limited to 'gnu/installer/newt/user.scm')
| -rw-r--r-- | gnu/installer/newt/user.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/installer/newt/user.scm b/gnu/installer/newt/user.scm index 13c20cd4d8..dab805198f 100644 --- a/gnu/installer/newt/user.scm +++ b/gnu/installer/newt/user.scm @@ -57,7 +57,8 @@ REAL-NAME, and HOME-DIRECTORY as the initial values in the form." (password-visible-cb (make-checkbox -1 -1 (G_ "Hide") #\x "x ")) (entry-password (make-entry -1 -1 entry-width - #:flags FLAG-PASSWORD)) + #:flags (logior FLAG-PASSWORD + FLAG-SCROLL))) (entry-grid (make-grid 3 5)) (button-grid (make-grid 1 1)) (ok-button (make-button -1 -1 (G_ "OK"))) |