guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/01: installer: Fix run-input-page calls.


From: guix-commits
Subject: 01/01: installer: Fix run-input-page calls.
Date: Mon, 23 Sep 2019 07:56:00 -0400 (EDT)

mothacehe pushed a commit to branch master
in repository guix.

commit 3dd3ac4d83db0609e10637e9d21d7abb2198398d
Author: Mathieu Othacehe <address@hidden>
Date:   Mon Sep 23 13:06:36 2019 +0200

    installer: Fix run-input-page calls.
    
    This fixes 55c43108 commit that renamed input-hide-checkbox? into
    input-visibility-checkbox?.
    
    * gnu/installer/newt/partition.scm (prompt-luks-passwords): Rename
    input-hide-checkbox? into input-visibility-checkbox?.
---
 gnu/installer/newt/partition.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/installer/newt/partition.scm b/gnu/installer/newt/partition.scm
index cd9d463..7a9f11a 100644
--- a/gnu/installer/newt/partition.scm
+++ b/gnu/installer/newt/partition.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2018 Mathieu Othacehe <address@hidden>
+;;; Copyright © 2018, 2019 Mathieu Othacehe <address@hidden>
 ;;; Copyright © 2019 Ludovic Courtès <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -159,14 +159,14 @@ USER-PARTITIONS list. Return this list with password 
fields filled-in."
                     (format #f (G_ "Please enter the password for the \
 encryption of partition ~a (label: ~a).") file-name crypt-label)
                     (G_ "Password required")
-                    #:input-hide-checkbox? #t)))
+                    #:input-visibility-checkbox? #t)))
                 (password-confirm-page
                  (lambda ()
                    (run-input-page
                     (format #f (G_ "Please confirm the password for the \
 encryption of partition ~a (label: ~a).") file-name crypt-label)
                     (G_ "Password confirmation required")
-                    #:input-hide-checkbox? #t))))
+                    #:input-visibility-checkbox? #t))))
            (if crypt-label
                (let loop ()
                  (let ((password (password-page))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]