From b24ba9733c0f506d56e66c0e8b6e131f98be5dc0 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Thu, 15 Mar 2012 12:17:31 +0000
Subject: (cleanrpmsrate) rename a variable for better reading

---
 pm/MGATools/rpmsrate.pm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'pm')

diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm
index 384b078..4e7a0e6 100644
--- a/pm/MGATools/rpmsrate.pm
+++ b/pm/MGATools/rpmsrate.pm
@@ -201,7 +201,7 @@ sub cleanrpmsrate {
 			 !/^[^ ]+ (.*)/ || $1 ne $f;
 		 } @{$done{$_}};
 
-	    my ($d) = /(.*)-[^-]+/;
+	    my ($name) = /(.*)-[^-]+/;
 	    my ($e, $do);
 
             if (!$is_plain_flag) {
@@ -228,11 +228,11 @@ sub cleanrpmsrate {
 	    }
 
 	    # process localized packages (eg: man-pages-XX, hunspell-XX, firefox-XX, ...)
-	    if ($locale{$d} && $localized_pkg{$c}) {
-		foreach (sort @{$locale{$d}}) {
-		    next if member($flat_path, @{$done{"$d-$_"}});
-		    push @{$done{"$d-$_"}}, $flat_path; 
-		    push @k , "$d-$_";
+	    if ($locale{$name} && $localized_pkg{$c}) {
+		foreach (sort @{$locale{$name}}) {
+		    next if member($flat_path, @{$done{"$name-$_"}});
+		    push @{$done{"$name-$_"}}, $flat_path; 
+		    push @k , "$name-$_";
 		}
 		next;
 	    }
-- 
cgit v1.2.1