From 5fc8842f4caae0c596be74be6837746305a73caf Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 6 Jan 2004 13:51:35 +0000 Subject: perl_checker cleanups --- perl-install/standalone/drakfloppy | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/drakfloppy') diff --git a/perl-install/standalone/drakfloppy b/perl-install/standalone/drakfloppy index d2348d69a..e4daae23b 100755 --- a/perl-install/standalone/drakfloppy +++ b/perl-install/standalone/drakfloppy @@ -50,7 +50,7 @@ unless ($::isEmbedded) { } -my ($output, @modules, @temp_modules, %buttons, %options, $tree_model, $tree, $list_model, $list); +my (@modules, @temp_modules, %buttons, %options, $tree_model, $tree, $list_model, $list); my $conffile = "/etc/sysconfig/drakfloppy"; @@ -286,7 +286,7 @@ sub build_it() { if_($options{raid}, "--omit-raid-modules"), if_(@modules, map { my $i = $_; $i =~ s!.*/!!; "--with=$i" } @modules), ); - $initrd_args = "--mkinitrdargs \"$initrd_args\"" if $initrd_args; + $initrd_args = qq(--mkinitrdargs "$initrd_args") if $initrd_args; my $co = join(' ', "/sbin/mkbootdisk --noprompt --verbose --device", $device_combo->entry->get_text, $initrd_args); $options{MODULES} = join(' ', @modules); setVarsInSh($conffile, \%options); -- cgit v1.2.1