diff options
author | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2020-12-21 19:17:35 +0000 |
---|---|---|
committer | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2020-12-21 19:17:35 +0000 |
commit | 5949e99383a4c92296fa2ffba13ccb442e8f53c5 (patch) | |
tree | 4573248a3d91bfdfd129f8dab74234a6b7a1ec1b /perl-install | |
parent | a95a0c267fe744529c5de1a1147c63f2e2218801 (diff) | |
download | drakx-5949e99383a4c92296fa2ffba13ccb442e8f53c5.tar drakx-5949e99383a4c92296fa2ffba13ccb442e8f53c5.tar.gz drakx-5949e99383a4c92296fa2ffba13ccb442e8f53c5.tar.bz2 drakx-5949e99383a4c92296fa2ffba13ccb442e8f53c5.tar.xz drakx-5949e99383a4c92296fa2ffba13ccb442e8f53c5.zip |
Use substInFile instead of sed.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/bootloader.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 85278c547..4a0e1a4bc 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -2507,8 +2507,8 @@ sub install_refind { sub set_refind_use_nvram { my ($use_nvram, $path) = @_; return if ! -w $path; - my $script = 's/^#?\s*use_nvram\s+.*/use_nvram ' . ($use_nvram ? 'true' : 'false') . '/'; - run_program::run('sed', '-i', '-E', $script, $path) or die "failed to update $path"; + my $setting = $use_nvram ? 'true' : 'false'; + substInFile { s/^#?\s*use_nvram\s+.*/use_nvram $setting/ } $path; } sub when_config_changed_refind { |