diff options
| author | Janneke Nieuwenhuizen <janneke@gnu.org> | 2024-10-16 08:59:13 +0200 |
|---|---|---|
| committer | Jan (janneke) Nieuwenhuizen <janneke@gnu.org> | 2024-11-11 07:28:34 +0100 |
| commit | cca544513b7c01e1cff33ac0c690031406dceac6 (patch) | |
| tree | 087d5a0eb602fcb3112b538161a83263d41cc41e /gnu/installer/utils.scm | |
| parent | e57bc3bcde9fc200c9196e94b29bf7b5b427411e (diff) | |
| download | guix-cca544513b7c01e1cff33ac0c690031406dceac6.tar.gz guix-cca544513b7c01e1cff33ac0c690031406dceac6.zip | |
installer: Use `%' for parameter %run-command-in-installer.
* gnu/installer/utils.scm (run-command-in-installer): Rename to...
(%run-command-in-installer): ...this.
* gnu/installer.scm (installer-program): Update accordingly.
* gnu/installer/parted.scm (remove-logical-devices, create-btrfs-file-system,
create-ext4-file-system, create-fat16-file-system, create-fat32-file-system,
create-jfs-file-system, create-ntfs-file-system, create-xfs-file-system,
create-swap-partition, luks-format-and-open, luks-ensure-open, luks-close):
Update accordingly.
Change-Id: I96ebc59ebc85fd8ebccb0cc57130b4e7532d287f
Diffstat (limited to 'gnu/installer/utils.scm')
| -rw-r--r-- | gnu/installer/utils.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/installer/utils.scm b/gnu/installer/utils.scm index c722e9af8f..170f036537 100644 --- a/gnu/installer/utils.scm +++ b/gnu/installer/utils.scm @@ -50,7 +50,7 @@ run-external-command-with-handler/tty run-external-command-with-line-hooks run-command - run-command-in-installer + %run-command-in-installer syslog-port %syslog-line-hook @@ -222,13 +222,13 @@ in a pseudoterminal." (pause) succeeded?) -(define run-command-in-installer +(define %run-command-in-installer (make-parameter (lambda (. args) (raise (condition (&serious) - (&message (message "run-command-in-installer not set"))))))) + (&message (message "%run-command-in-installer not set"))))))) ;;; |