diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-22 16:13:13 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-22 16:13:13 +0000 |
commit | 341125c9f53352b178e9ca127e9dcc55ef89bf31 (patch) | |
tree | b3f97068ec5cd37772c699d45959ca246bc5b0db /perl-install/network | |
parent | 0772882ffc3fbf63d3afa5e468783240cb6085b7 (diff) | |
download | drakx-341125c9f53352b178e9ca127e9dcc55ef89bf31.tar drakx-341125c9f53352b178e9ca127e9dcc55ef89bf31.tar.gz drakx-341125c9f53352b178e9ca127e9dcc55ef89bf31.tar.bz2 drakx-341125c9f53352b178e9ca127e9dcc55ef89bf31.tar.xz drakx-341125c9f53352b178e9ca127e9dcc55ef89bf31.zip |
(copy_firmware) kill it (was merged into add intf wizard
Diffstat (limited to 'perl-install/network')
-rw-r--r-- | perl-install/network/tools.pm | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index 6fe4c047c..ec5169cf2 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -188,28 +188,6 @@ EOF }; } -sub copy_firmware { - my ($device, $destination, $file) = @_; - my ($source, $failed, $mounted); - - $device eq 'floppy' and do { $mounted = 1; ($source, $failed) = use_floppy($file) }; - $device eq 'windows' and ($source, $failed) = use_windows(); - - $source eq $failed and return; - $mounted and my $_b = before_leaving { fs::umount('/mnt') }; - if ($failed) { - eval { $in->ask_warn('', $failed) }; $in->exit if $@ =~ /wizcancel/; - return; - } - - if (-e "$source/$file") { cp_af("$source/$file", $destination) } - else { $failed = N("Firmware copy failed, file %s not found", $file) } - eval { $in->ask_warn('', $failed || N("Firmware copy succeeded")) }; $in->exit if $@ =~ /wizcancel/; - log::explanations($failed || "Firmware copy $file in $destination succeeded"); - - $failed ? 0 : 1; -} - sub use_windows() { my $all_hds = fsedit::get_hds({}, undef); fs::get_info_from_fstab($all_hds, ''); |