diff options
Diffstat (limited to 'urpm/sys.pm')
-rw-r--r-- | urpm/sys.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/urpm/sys.pm b/urpm/sys.pm index 231a37c7..42b4c337 100644 --- a/urpm/sys.pm +++ b/urpm/sys.pm @@ -31,9 +31,7 @@ typically from the inst.list or skip.list files. sub get_packages_list { my ($file, $o_extra) = @_; my @l = split(/,/, $o_extra || ''); - if ($file && open(my $f, '<', $file)) { - push @l, <$f>; - } + push @l, cat_($file); [ grep { $_ } map { chomp; s/#.*$//; s/^\s*//; s/\s*$//; $_; |