From 39cb4f28e973ac1860b57777e795ce1eafb7875d Mon Sep 17 00:00:00 2001 From: Guillem Jover Date: Thu, 3 Nov 2016 01:05:59 +0100 Subject: dpkg-distaddfile: Rename variable from $file to $filename --- scripts/dpkg-distaddfile.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scripts/dpkg-distaddfile.pl b/scripts/dpkg-distaddfile.pl index e9cc6a6f5..060b3a2b0 100755 --- a/scripts/dpkg-distaddfile.pl +++ b/scripts/dpkg-distaddfile.pl @@ -72,9 +72,9 @@ while (@ARGV && $ARGV[0] =~ m/^-/) { } usageerr(g_('need exactly a filename, section and priority')) if @ARGV != 3; -my ($file, $section, $priority) = @ARGV; +my ($filename, $section, $priority) = @ARGV; -($file =~ m/\s/ || $section =~ m/\s/ || $priority =~ m/\s/) && +($filename =~ m/\s/ || $section =~ m/\s/ || $priority =~ m/\s/) && error(g_('filename, section and priority may contain no whitespace')); # Obtain a lock on debian/control to avoid simultaneous updates @@ -87,7 +87,7 @@ file_lock($lockfh, $lockfile); my $dist = Dpkg::Dist::Files->new(); $dist->load($fileslistfile) if -e $fileslistfile; -$dist->add_file($file, $section, $priority); +$dist->add_file($filename, $section, $priority); $dist->save("$fileslistfile.new"); rename("$fileslistfile.new", $fileslistfile) -- cgit v1.2.3