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
This commit is contained in:
Janneke Nieuwenhuizen 2024-10-16 08:59:13 +02:00 committed by Jan (janneke) Nieuwenhuizen
parent e57bc3bcde
commit cca544513b
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
3 changed files with 18 additions and 17 deletions

View file

@ -465,7 +465,7 @@ purposes."
(installer-init current-installer)
(lambda ()
(parameterize
((run-command-in-installer
((%run-command-in-installer
(installer-run-command current-installer)))
(catch #t
(lambda ()