diff options
| author | Olivier Thauvin <nanardon@mandriva.org> | 2007-07-02 13:19:43 +0000 |
|---|---|---|
| committer | Olivier Thauvin <nanardon@mandriva.org> | 2007-07-02 13:19:43 +0000 |
| commit | b803324c16756b9c541546d1fc2e717a13aacd9b (patch) | |
| tree | 4cfd8f14a3c632ed498c1b8b826530f34ef89a85 /lib/MDV | |
| parent | ec9e8db0b202e0914fc73f4095dd4240c302c15b (diff) | |
| download | perl-MDV-Distribconf-b803324c16756b9c541546d1fc2e717a13aacd9b.tar perl-MDV-Distribconf-b803324c16756b9c541546d1fc2e717a13aacd9b.tar.gz perl-MDV-Distribconf-b803324c16756b9c541546d1fc2e717a13aacd9b.tar.bz2 perl-MDV-Distribconf-b803324c16756b9c541546d1fc2e717a13aacd9b.tar.xz perl-MDV-Distribconf-b803324c16756b9c541546d1fc2e717a13aacd9b.zip | |
- add platform value
Diffstat (limited to 'lib/MDV')
| -rw-r--r-- | lib/MDV/Distribconf.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/MDV/Distribconf.pm b/lib/MDV/Distribconf.pm index 560ae19..bab6a76 100644 --- a/lib/MDV/Distribconf.pm +++ b/lib/MDV/Distribconf.pm @@ -455,6 +455,18 @@ sub getvalue { and do { $default = $_; last }; /^(?:tag|branch)$/ and do { $default = ''; last }; /^(?:media|info)dir$/ and do { $default = $distrib->{$var}; last }; + /^os$/ and do { $default = 'linux'; last; }; + /^gnu$/ and do { $default = 1; last; }; + /^vendor$/ and do { $default = 'mandriva'; last; }; + /^platform$/ and do { + $default = sprintf('%s-%s-%s%s', + $distrib->getvalue($media, 'arch'), + $distrib->getvalue($media, 'vendor'), + $distrib->getvalue($media, 'os'), + $distrib->getvalue($media, 'gnu') ? '-gnu' : '', + ); + last; + }; } return $distrib->_expand($media, $distrib->{cfg}->val($media, $var, $default), $level); } |