diff options
-rw-r--r-- | URPM/Build.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Build.pm b/URPM/Build.pm index d4921f2..8dcb893 100644 --- a/URPM/Build.pm +++ b/URPM/Build.pm @@ -27,7 +27,7 @@ sub parse_rpms_build_headers { opendir DIR, $dir; while (my $file = readdir DIR) { my ($fullname, $filename) = $file =~ /(.+?-[^:\-]+-[^:\-]+\.[^:\-\.]+)(?::(\S+))?$/ or next; - my @stat = stat "$dir/$_"; + my @stat = stat "$dir/$file"; $cache{$filename || $fullname} = { file => $file, size => $stat[7], time => $stat[9], |