diff options
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/bootloader-config | 2 | ||||
-rwxr-xr-x | perl-install/standalone/drakautoinst | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/standalone/bootloader-config b/perl-install/standalone/bootloader-config index e167a5e54..5903b0226 100755 --- a/perl-install/standalone/bootloader-config +++ b/perl-install/standalone/bootloader-config @@ -120,7 +120,7 @@ sub add_kernel() { my $root_part = fs::get::root([ fs::get::fstab($all_hds) ]) or die "can not find root partition\n"; my %opts = ( - root => fs::part2wild_device_name('', $root_part), + root => fs::wild_device::from_part('', $root_part), initrd_options => $initrd_options, if_($label, label => $label), if_($bootloader->{default_vga}, vga => $bootloader->{default_vga}), diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst index 6dbfb3a36..b4b1e3453 100755 --- a/perl-install/standalone/drakautoinst +++ b/perl-install/standalone/drakautoinst @@ -82,11 +82,11 @@ do { }; $again = $@; #- grrr... $@ is localized in code block :-( } while $again; -fs::mount($dev, $mountdir, 'vfat', 0); +fs::mount::mount($dev, $mountdir, 'vfat', 0); if (-f $imagefile2) { do { - eval { fs::umount($mountdir) }; + eval { fs::mount::umount($mountdir) }; $in->ask_okcancel('', N("Insert another blank floppy in drive %s (for drivers disk)", $floppy), 1) or quit_global($in, 0); log::explanations(N("Creating auto install floppy (drivers disk)")); my $_w = $in->wait_message('', N("Creating auto install floppy")); @@ -96,7 +96,7 @@ if (-f $imagefile2) { }; $again = $@; #- grrr... $@ is localized in code block :-( } while $again; - fs::mount($dev, $mountdir, 'ext2', 0); + fs::mount::mount($dev, $mountdir, 'ext2', 0); } my $cfgfile = "$mountdir/auto_inst.cfg"; @@ -245,7 +245,7 @@ my $str = join('', $str =~ s/ {8}/\t/g; #- replace all 8 space char by only one tabulation, this reduces file size so much :-) output($cfgfile, $str); -fs::umount($mountdir); +fs::mount::umount($mountdir); $in->ask_okcancel(N("Congratulations!"), N("The floppy has been successfully generated. |