diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-08 14:53:19 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-08 14:53:19 +0000 |
commit | 9fa10e2fcf966bb906e66b5976c0b7ec835577bf (patch) | |
tree | 970e449492ded34811815f2bbf39d39a8160d7bd /perl-install | |
parent | 3e14cf3a1182776c9dba2cdebb8b9599edc100c7 (diff) | |
download | drakx-backup-do-not-use-9fa10e2fcf966bb906e66b5976c0b7ec835577bf.tar drakx-backup-do-not-use-9fa10e2fcf966bb906e66b5976c0b7ec835577bf.tar.gz drakx-backup-do-not-use-9fa10e2fcf966bb906e66b5976c0b7ec835577bf.tar.bz2 drakx-backup-do-not-use-9fa10e2fcf966bb906e66b5976c0b7ec835577bf.tar.xz drakx-backup-do-not-use-9fa10e2fcf966bb906e66b5976c0b7ec835577bf.zip |
rename ensure_is_installed_if_availlable( as ensure_is_installed_if_available()
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/do_pkgs.pm | 2 | ||||
-rw-r--r-- | perl-install/network/netconnect.pm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm index f49f6dcb4..9ab4a8982 100644 --- a/perl-install/do_pkgs.pm +++ b/perl-install/do_pkgs.pm @@ -29,7 +29,7 @@ sub ensure_is_installed { 1; } -sub ensure_is_installed_if_availlable { +sub ensure_is_installed_if_available { my ($do, $pkg, $file) = @_; if (! -e "$::prefix$file" && !$::testing) { $do->{in}->do_pkgs->what_provides($pkg) and $do->{in}->do_pkgs->install($pkg); diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index b680df1fb..e5ffcfbb7 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -619,11 +619,11 @@ killall pppd $need_restart_network = member($ntf_name, qw(speedtouch eci)); $in->do_pkgs->install($packages{$ntf_name}->[0]) if $packages{$ntf_name} && !-e $packages{$ntf_name}->[1]; if ($ntf_name eq 'speedtouch') { - $in->do_pkgs->ensure_is_installed_if_availlable('speedtouch_mgmt', "$::prefix/usr/share/speedtouch/mgmt.o"); + $in->do_pkgs->ensure_is_installed_if_available('speedtouch_mgmt', "$::prefix/usr/share/speedtouch/mgmt.o"); return 'adsl_speedtouch_firmware' if ! -e "$::prefix/usr/share/speedtouch/mgmt.o"; } if ($ntf_name eq 'bewan' && !$::testing) { - $in->do_pkgs->ensure_is_installed_if_availlable('unicorn', "$::prefix/usr/bin/bewan_adsl_status"); + $in->do_pkgs->ensure_is_installed_if_available('unicorn', "$::prefix/usr/bin/bewan_adsl_status"); } return 'adsl_provider' if $adsl_devices{$ntf_name}; return 'adsl_protocol'; |