summaryrefslogtreecommitdiff
path: root/guix/scripts
diff options
context:
space:
mode:
authorMathieu Othacehe <m.othacehe@gmail.com>2017-06-10 10:47:25 +0200
committerMathieu Othacehe <m.othacehe@gmail.com>2017-06-10 18:32:11 +0200
commitf96752e378e924b44f75f642104956314d7d5fe5 (patch)
treeb0ca9d06d0a5b60821aa1cd8f09fa33b81c2dbff /guix/scripts
parent9a0968816f831ee6bc2343c3aca254bbbf9958cc (diff)
bootloader: Rename boot-name to bootloader-name.
* gnu/system (<boot-parameters>)[boot-name]: Rename field to... [bootloader-name]: ... this. Adjust users. * gnu/scripts/system.scm: Adjust accordingly.
Diffstat (limited to 'guix/scripts')
-rw-r--r--guix/scripts/system.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index f71b1d71b8..35675cc018 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -425,7 +425,7 @@ generation as its default entry. STORE is an open connection to the store."
"Return the bootloader name stored in SYSTEM's \"parameters\" file."
(let ((params (unless-file-not-found
(read-boot-parameters-file system))))
- (boot-parameters-boot-name params)))
+ (boot-parameters-bootloader-name params)))
(define (reinstall-bootloader store number)
"Re-install bootloader for existing system profile generation NUMBER.
@@ -521,7 +521,7 @@ list of services."
(let* ((generation (generation-file-name profile number))
(params (read-boot-parameters-file generation))
(label (boot-parameters-label params))
- (boot-name (boot-parameters-boot-name params))
+ (bootloader-name (boot-parameters-bootloader-name params))
(root (boot-parameters-root-device params))
(root-device (if (bytevector? root)
(uuid->string root)
@@ -532,7 +532,7 @@ list of services."
(format #t (G_ " canonical file name: ~a~%") (readlink* generation))
;; TRANSLATORS: Please preserve the two-space indentation.
(format #t (G_ " label: ~a~%") label)
- (format #t (G_ " bootloader: ~a~%") boot-name)
+ (format #t (G_ " bootloader: ~a~%") bootloader-name)
(format #t (G_ " root device: ~a~%") root-device)
(format #t (G_ " kernel: ~a~%") kernel))))