diff options
author | Daouda Lo <daouda@mandriva.com> | 2004-03-19 15:10:01 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2004-03-19 15:10:01 +0000 |
commit | 89911e4145aaf6d6a249b07138a4bab01bf61a23 (patch) | |
tree | e5fbe36e15a2cad7b3eefc731c9ab2ae47b22e7c | |
parent | b1712cafef08290e8442a3713467e03d32b0d72a (diff) | |
download | mgaonline-89911e4145aaf6d6a249b07138a4bab01bf61a23.tar mgaonline-89911e4145aaf6d6a249b07138a4bab01bf61a23.tar.gz mgaonline-89911e4145aaf6d6a249b07138a4bab01bf61a23.tar.bz2 mgaonline-89911e4145aaf6d6a249b07138a4bab01bf61a23.tar.xz mgaonline-89911e4145aaf6d6a249b07138a4bab01bf61a23.zip |
- get Mandrakelinux release in list context
-rwxr-xr-x | mdkupdate | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -247,7 +247,7 @@ sub updateConf { } sub addMedia { my $mirror = shift; - my $r = getRelease(); + my ($r) = getRelease(); my $fullpath2mir = "$mirror". "/$r" . "/RPMS" . "/" ; eval { system "/usr/sbin/urpmi.removemedia", "mdkupdate"; @@ -256,8 +256,8 @@ sub addMedia { $@ and die "Problem adding Update Media with urpmi"; } sub getRelease() { - my $release = cat_('/etc/mandrake-release') =~ /release\s+(\S+)/; - $release + my ($release) = cat_('/etc/mandrake-release') =~ /release\s+(\S+)/; + ($release) } sub updatePkgs { my (@str) = @_; |