06/11: gnu: make-u-boot-package: Fix indentation.

[guix-commits]

apteryx pushed a commit to branch master
in repository guix.

commit e99dc7353faeb993ec6817d73ae243e108c189e6
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Thu Dec 1 11:29:36 2022 -0500

    gnu: make-u-boot-package: Fix indentation.
    
    * gnu/packages/bootloaders.scm (make-u-boot-package): Fix indentation.
---
 gnu/packages/bootloaders.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/bootloaders.scm b/gnu/packages/bootloaders.scm
index c1283d5ef9..efa078f319 100644
--- a/gnu/packages/bootloaders.scm
+++ b/gnu/packages/bootloaders.scm
@@ -699,9 +699,9 @@ optional DEFCONFIG file and optional configuration changes 
from CONFIGS."
                                                      "_" "-")))
       (native-inputs
        `(,@(if (not (same-arch?))
-             `(("cross-gcc" ,(cross-gcc triplet))
-               ("cross-binutils" ,(cross-binutils triplet)))
-             `())
+               `(("cross-gcc" ,(cross-gcc triplet))
+                 ("cross-binutils" ,(cross-binutils triplet)))
+               `())
          ,@(package-native-inputs u-boot)))
       (arguments
        `(#:modules ((ice-9 ftw)
@@ -715,8 +715,8 @@ optional DEFCONFIG file and optional configuration changes 
from CONFIGS."
          #:make-flags
          (list "HOSTCC=gcc"
                ,@(if (not (same-arch?))
-                   `((string-append "CROSS_COMPILE=" ,triplet "-"))
-                   '()))
+                     `((string-append "CROSS_COMPILE=" ,triplet "-"))
+                     '()))
          #:phases
          (modify-phases %standard-phases
            (replace 'configure
@@ -735,7 +735,7 @@ optional DEFCONFIG file and optional configuration changes 
from CONFIGS."
                        (apply invoke "make" `(,@make-flags ,config-name))
                        (verify-config ".config" config-file))
                      (begin
-                       (display "Invalid board name. Valid board names are:"
+                       (display "invalid board name; valid board names are:"
                                 (current-error-port))
                        (let ((suffix-len (string-length "_defconfig"))
                              (entries (scandir "configs")))
@@ -746,7 +746,7 @@ optional DEFCONFIG file and optional configuration changes 
from CONFIGS."
                                                (string-drop-right file-name
                                                                   
suffix-len))))
                                    (sort entries string-ci<)))
-                       (error "Invalid boardname ~s." ,board))))))
+                       (error "invalid boardname ~s" ,board))))))
            (add-after 'configure 'disable-tools-libcrypto
              ;; Disable libcrypto due to GPL and OpenSSL license
              ;; incompatibilities