diff options
author | Thierry Vignaud <tv@mageia.org> | 2011-11-27 00:49:53 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2011-11-27 00:49:53 +0000 |
commit | b74bdd4a160dc043d7836a4e5baa6853987d0244 (patch) | |
tree | 07192e453cac39c5079cf6103d5ed788da14b9e7 | |
parent | 03619f53a8827b58e64752dabf13b53d2837b821 (diff) | |
download | drakx-backup-do-not-use-b74bdd4a160dc043d7836a4e5baa6853987d0244.tar drakx-backup-do-not-use-b74bdd4a160dc043d7836a4e5baa6853987d0244.tar.gz drakx-backup-do-not-use-b74bdd4a160dc043d7836a4e5baa6853987d0244.tar.bz2 drakx-backup-do-not-use-b74bdd4a160dc043d7836a4e5baa6853987d0244.tar.xz drakx-backup-do-not-use-b74bdd4a160dc043d7836a4e5baa6853987d0244.zip |
(parse_release_file) silent perl_checker
-rw-r--r-- | perl-install/common.pm | 2 |
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 { |