diff options
author | Thierry.Vignaud <thierry.vignaud@gmail.com> | 2014-05-28 22:37:23 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-05-28 22:37:23 +0200 |
commit | df74e103d8de6d7cc45cc3e2a99f4b9c8fff6085 (patch) | |
tree | 3ce05fa2bbad4d01d0df7a268abab40315b72e22 /perl-install/install/any.pm | |
parent | ac656a1c73103b06962ab6199da16a8607528c19 (diff) | |
download | drakx-df74e103d8de6d7cc45cc3e2a99f4b9c8fff6085.tar drakx-df74e103d8de6d7cc45cc3e2a99f4b9c8fff6085.tar.gz drakx-df74e103d8de6d7cc45cc3e2a99f4b9c8fff6085.tar.bz2 drakx-df74e103d8de6d7cc45cc3e2a99f4b9c8fff6085.tar.xz drakx-df74e103d8de6d7cc45cc3e2a99f4b9c8fff6085.zip |
simplify using member()
Diffstat (limited to 'perl-install/install/any.pm')
-rw-r--r-- | perl-install/install/any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index 09f55f200..5187ebc78 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -225,7 +225,7 @@ sub ask_mirror { sub ask_suppl_media_url { my ($o, $method, $o_url) = @_; - if ($method eq 'ftp' || $method eq 'http') { + if (member($method, qw(ftp http)) { install::any::ask_mirror($o, 'distrib', $o_url); } elsif ($method eq 'cdrom') { 'cdrom://'; |