michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-02-03 14:13:29 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Include version of package to get from debian https://github.com/webmin/webmin/issues/2261

Browse Source
This commit is contained in:
Jamie Cameron
2024-08-27 21:11:35 -07:00
parent 6e3fb4d806
commit 0939e55b01
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
software/debian-lib.pl
View File

@@ -49,12 +49,13 @@ return lc($_[0]) =~ /^[a-e]/ ? "A-E" :
lc($_[0]) =~ /^[u-z]/ ? "U-Z" : "Other";
}
# package_info(package)
# package_info(package, [version])
# Returns an array of package information in the order
# name, class, description, arch, version, vendor, installtime
sub package_info
{
local $qm = quotemeta($_[0]);
local ($pkg, $ver) = @_;
local $qm = quotemeta($pkg);
# First check if it is really installed, and not just known to the package
# system in some way
@@ -67,6 +68,7 @@ if ($lines[$#lines] !~ /^.[ih]/) {
# Get full status
local $out;
if (&has_command("apt-cache")) {
$qm .= ":".quotemeta($ver) if ($ver);
$out = &backquote_command("apt-cache show $qm 2>&1", 1);
$out =~ s/[\0-\177]*\r?\n\r?\n(Package:)/\\1/; # remove available ver
}