Bad return type if skip.list or inst.list is not here

1 files changed, 1 insertions, 1 deletions

diff --git a/urpm.pm b/urpm.pm
index c3a7458a..23ab989e 100644
--- a/urpm.pm
+++ b/urpm.pm
@@ -2365,7 +2365,7 @@ sub create_transaction {
 sub get_packages_list {
     my ($file, $extra) = @_;
     my $val = [];
-    open my $f, $file or return {};
+    open my $f, $file or return [];
     foreach (<$f>, split /,/, $extra || '') {
 	chomp; s/#.*$//; s/^\s*//; s/\s*$//;
 	next if $_ eq '';