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>
This commit is contained in:
Josselin Poiret 2022-01-15 14:50:04 +01:00 committed by Mathieu Othacehe
parent 0a74509a69
commit dad9a1c0b2
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 1 additions and 0 deletions

View File

@ -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)))))