diff options
| author | Josselin Poiret <dev@jpoiret.xyz> | 2022-01-15 14:50:04 +0100 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-01-17 08:44:40 +0100 |
| commit | dd5177a377e8ad1fb5412654201515c0ba950fb1 (patch) | |
| tree | 74cdd8214dba3a3a39c27cebefe874f5d4f272c2 | |
| parent | e91ddc728c2aa4d6c3b823f63089060b6c064267 (diff) | |
| download | guix-dd5177a377e8ad1fb5412654201515c0ba950fb1.tar.gz | |
installer: Fix run-file-textbox-page when edit-button is #f.
* gnu/installer/newt/page.scm (run-file-textbox-page): Check if edit-button is #f. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
| -rw-r--r-- | gnu/installer/newt/page.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gnu/installer/newt/page.scm b/gnu/installer/newt/page.scm index d9901c33a1..9c684a3899 100644 --- a/gnu/installer/newt/page.scm +++ b/gnu/installer/newt/page.scm @@ -812,6 +812,7 @@ ITEMS when 'Ok' is pressed." (destroy-form-and-pop form)))) (if (and (eq? exit-reason 'exit-component) + edit-button (components=? argument edit-button)) (loop) ;recurse in tail position result))))) |