Prevent uninitialized variable warning in File::BaseDir

mbeijen · May 28, 2022 · 8519aee · 8519aee
1 parent d40620d
commit 8519aee
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/File/MimeInfo/Applications.pm b/lib/File/MimeInfo/Applications.pm
@@ -178,7 +178,7 @@ sub _write_list {
 }
 
 sub _find_file {
-    my @list = shift;
+    my @list = @_;
     for (@list) {
         my $file = data_files('applications', $_);
         return File::DesktopEntry->new($file) if $file;