me
/
guix
Archived
1
0
Fork 0
Code

installer: Rename RUN-PARTIONING-PAGE. 

* gnu/installer/newt/partition.scm (run-partioning-page): Rename to
run-partitioning-page.  Adjust all callers.
master
Tobias Geerinckx-Rice 2020-09-20 21:09:19 +02:00
parent e1f3788944
commit 5e17ae7fbd
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gnu/installer/newt.scm
View File

@ -107,7 +107,7 @@ problem. The backtrace is displayed below. Please report it by email to \
(run-user-page))
(define (partition-page)
(run-partioning-page))
(run-partitioning-page))
(define (services-page)
(run-services-page))

4
gnu/installer/newt/partition.scm
View File

@ -32,7 +32,7 @@
#:use-module (srfi srfi-35)
#:use-module (newt)
#:use-module (parted)
#:export (run-partioning-page))
#:export (run-partitioning-page))
(define (button-exit-action)
"Raise the &installer-step-abort condition."
@ -725,7 +725,7 @@ by pressing the Exit button.~%~%")))
(run-disk-page result-disks new-user-partitions
#:guided? guided?)))))
(define (run-partioning-page)
(define (run-partitioning-page)
"Run a page asking the user for a partitioning method."
(define (run-page devices)
(let* ((items