diff options
author | Michael Meeks <michael.meeks@novell.com> | 2010-11-30 16:58:24 +0000 |
---|---|---|
committer | Michael Meeks <michael.meeks@novell.com> | 2010-11-30 16:58:24 +0000 |
commit | c9eaa19fcd240d917ad8d758ce76e0b3145322da (patch) | |
tree | ec3ea8e7351d9d4cca7c15662492b27e182bfb68 /solenv/bin/modules/installer/download.pm | |
parent | 9ee0c6f818a75d9d42d74d4ad56480048e40ed4f (diff) |
get substitution order right for overlapping variables
Diffstat (limited to 'solenv/bin/modules/installer/download.pm')
-rw-r--r-- | solenv/bin/modules/installer/download.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/solenv/bin/modules/installer/download.pm b/solenv/bin/modules/installer/download.pm index ceb237ecbc8e..01fe0e4691e6 100644 --- a/solenv/bin/modules/installer/download.pm +++ b/solenv/bin/modules/installer/download.pm @@ -1708,7 +1708,8 @@ sub replace_variables { my ($translationfile, $variableshashref) = @_; - foreach $key (keys %{$variableshashref}) + # we want to substitute FOO_BR before FOO to avoid floating _BR suffixes + foreach $key (sort { length ($b) <=> length ($a) } keys %{$variableshashref}) { my $value = $variableshashref->{$key}; |