diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-09-24 06:30:35 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-09-24 06:30:35 +0000 |
| commit | 17f58faa872cfd030c259bb19939f8d40e2ab504 (patch) | |
| tree | 317e68949febaaa7b044a905b25daa552538d3a0 /perl-install | |
| parent | c665b05d021c91887aacd736d4e283ab8e47a8a0 (diff) | |
| download | drakx-backup-do-not-use-17f58faa872cfd030c259bb19939f8d40e2ab504.tar drakx-backup-do-not-use-17f58faa872cfd030c259bb19939f8d40e2ab504.tar.gz drakx-backup-do-not-use-17f58faa872cfd030c259bb19939f8d40e2ab504.tar.bz2 drakx-backup-do-not-use-17f58faa872cfd030c259bb19939f8d40e2ab504.tar.xz drakx-backup-do-not-use-17f58faa872cfd030c259bb19939f8d40e2ab504.zip | |
Remove dead code
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 3b10a255c..ecfac97ee 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -76,14 +76,7 @@ sub askChangeMedium($$) { $allow; } -sub method_is_from_ISO_images($) { - my ($method) = @_; - $method eq "disk-iso" || $method eq "nfs-iso"; -} -sub method_allows_medium_change($) { - my ($method) = @_; - $method eq "cdrom" || method_is_from_ISO_images($method); -} +sub method_allows_medium_change($) { $_[0] eq "cdrom" } sub errorOpeningFile($) { my ($file) = @_; |