From 43362aa70f0fee6f6486ec6eec1a0e78412e1cfd Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 6 Apr 2005 10:58:01 +0000 Subject: use short-circuit operator (/me sux, thanks Pixel) --- perl-install/do_pkgs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/do_pkgs.pm') diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm index 0b2c23fa4..2ea2f16c6 100644 --- a/perl-install/do_pkgs.pm +++ b/perl-install/do_pkgs.pm @@ -65,7 +65,7 @@ sub check_kernel_module_packages { map { $base_name . '-' . bootloader::vmlinuz2version($_); } bootloader::installed_vmlinuz()); - my @ext = if_($o_ext_name, $do->are_available($o_ext_name)); + my @ext = $o_ext_name && $do->are_available($o_ext_name); log::l("found kernel module packages $_") foreach @rpms, @ext; -- cgit v1.2.1