From dad9a1c0b2fe4bfeb271e229ddfefb3d894d314d Mon Sep 17 00:00:00 2001 From: Josselin Poiret Date: Sat, 15 Jan 2022 14:50:04 +0100 Subject: 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 --- gnu/installer/newt/page.scm | 1 + 1 file changed, 1 insertion(+) (limited to 'gnu') 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))))) -- cgit 1.4.1