michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-05-04 22:30:33 +01:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

include architecture in package info

Browse Source
This commit is contained in:
Jamie Cameron
2014-04-18 17:23:56 -07:00
parent 81b4516831
commit dae558789d
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
software/rpm-lib.pl
View File

@@ -13,13 +13,14 @@ sub list_packages
local($i, $list); $i = 0;
$list = @_ ? join(' ', map { quotemeta($_) } @_) : "-a";
%packages = ( );
&open_execute_command(RPM, "rpm -q $list --queryformat \"%{NAME}\\n%{VERSION}-%{RELEASE}\\n%{EPOCH}\\n%{GROUP}\\n%{SUMMARY}\\n\\n\"", 1, 1);
&open_execute_command(RPM, "rpm -q $list --queryformat \"%{NAME}\\n%{VERSION}-%{RELEASE}\\n%{EPOCH}\\n%{GROUP}\\n%{ARCH}\\n%{SUMMARY}\\n\\n\"", 1, 1);
while($packages{$i,'name'} = <RPM>) {
chop($packages{$i,'name'});
chop($packages{$i,'version'} = <RPM>);
chop($packages{$i,'epoch'} = <RPM>);
$packages{$i,'epoch'} = undef if ($packages{$i,'epoch'} eq '(none)');
chop($packages{$i,'class'} = <RPM>);
chop($packages{$i,'arch'} = <RPM>);
while(<RPM>) {
s/\r|\n/ /g;
last if (!/\S/);