aboutsummaryrefslogtreecommitdiffstats
path: root/find-lang.pl
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-10-23 23:52:04 +0000
committerThierry Vignaud <tv@mageia.org>2012-10-23 23:52:04 +0000
commitf8bdbad36ce8ebd93cbf11a5bfc382aef66856b8 (patch)
tree0e4fc172d1d99dac880e63b50005eca8c06e305b /find-lang.pl
parent28e65f0715fdca6355d68235bfec5d1d8b1f023b (diff)
downloadrpm-setup-f8bdbad36ce8ebd93cbf11a5bfc382aef66856b8.tar
rpm-setup-f8bdbad36ce8ebd93cbf11a5bfc382aef66856b8.tar.gz
rpm-setup-f8bdbad36ce8ebd93cbf11a5bfc382aef66856b8.tar.bz2
rpm-setup-f8bdbad36ce8ebd93cbf11a5bfc382aef66856b8.tar.xz
rpm-setup-f8bdbad36ce8ebd93cbf11a5bfc382aef66856b8.zip
use pop with ()
Diffstat (limited to 'find-lang.pl')
-rwxr-xr-xfind-lang.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/find-lang.pl b/find-lang.pl
index 5f4a84e..6b83eea 100755
--- a/find-lang.pl
+++ b/find-lang.pl
@@ -138,7 +138,7 @@ sub parent_to_own {
debug("Parent %s will be %s", $parent, $lang);
} else {
my @subdir = grep { $_ } split('/', substr($file, length($parent)));
- pop(@subdir);
+ pop @subdir;
$finallist{$parent}{dir} = 1;
$finallist{$parent}{lang}{$lang} = 1;
debug("Parent %s will be %s", $parent, $lang);