summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2011-11-27 00:49:53 +0000
committerThierry Vignaud <tv@mageia.org>2011-11-27 00:49:53 +0000
commitb82b02fece7f4884848fecb34cc48c734ed12d55 (patch)
tree07192e453cac39c5079cf6103d5ed788da14b9e7
parent03864dc61ca43ad83e2fe215d8b5438d2b351a3a (diff)
downloaddrakx-b82b02fece7f4884848fecb34cc48c734ed12d55.tar
drakx-b82b02fece7f4884848fecb34cc48c734ed12d55.tar.gz
drakx-b82b02fece7f4884848fecb34cc48c734ed12d55.tar.bz2
drakx-b82b02fece7f4884848fecb34cc48c734ed12d55.tar.xz
drakx-b82b02fece7f4884848fecb34cc48c734ed12d55.zip
(parse_release_file) silent perl_checker
-rw-r--r--perl-install/common.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm
index 30ef121e2..c30abc9d1 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -340,7 +340,7 @@ sub parse_release_file {
my $arch = $s =~ s/\s+for\s+(\S+)// && $1;
log::l("find_root_parts found $part->{device}: $s for $arch" . ($f !~ m!/etc/! ? " in special release file $f" : ''));
{ release => $s, version => $version,
- release_file => $f, part => $part, arch => $arch };
+ release_file => $f, part => $part, 'arch' => $arch };
}
sub release_file {