diff options
| author | Josselin Poiret <dev@jpoiret.xyz> | 2022-01-15 14:50:04 +0100 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-02-02 16:46:43 +0100 |
| commit | dad9a1c0b2fe4bfeb271e229ddfefb3d894d314d (patch) | |
| tree | 118d5b1a1789deffd218a65b8008fdbf5d3a0991 /gnu | |
| parent | 0a74509a696671580c8a7dc768d26f414748bab5 (diff) | |
| download | guix-dad9a1c0b2fe4bfeb271e229ddfefb3d894d314d.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>
Diffstat (limited to 'gnu')
| -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))))) |