mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-06-10 00:18:54 +02:00
installer: Exit console-services page with abort-to-prompt.
* gnu/installer/newt/services.scm (run-console-services-cbt-page): Do it. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
committed by
Mathieu Othacehe
parent
fd942712d8
commit
2e8b4f9bfa
@@ -99,10 +99,8 @@ non-graphical system.")
|
||||
#:item->text (compose G_ system-service-name)
|
||||
#:checkbox-tree-height 5
|
||||
#:exit-button-callback-procedure
|
||||
(lambda ()
|
||||
(raise
|
||||
(condition
|
||||
(&installer-step-abort)))))))
|
||||
(lambda _
|
||||
(abort-to-prompt 'installer-step 'abort)))))
|
||||
|
||||
(define (run-network-management-page)
|
||||
"Run a page to select among several network management methods."
|
||||
|
||||
Reference in New Issue
Block a user