diff --git a/package-updates/package-updates-lib.pl b/package-updates/package-updates-lib.pl index 9cdf74868..370376fa6 100644 --- a/package-updates/package-updates-lib.pl +++ b/package-updates/package-updates-lib.pl @@ -28,8 +28,8 @@ $apt_cache_file = "$module_config_directory/aptcache"; $yum_changelog_cache_dir = "$module_config_directory/yumchangelog"; # list_current(nocache) -# Returns a list of packages and versions for the core packages managed -# by this module. Return keys are : +# Returns a list of packages and versions for Virtualmin-related packages +# managed by this module. Return keys are : # name - The local package name (ie. CSWapache2) # update - Name used to refer to it by the updates system (ie. apache2) # version - Version number @@ -347,37 +347,7 @@ if (!$pkg) { print &text('update_efindpkg', $name),"
\n";
return ( );
}
-if ($pkg->{'system'} eq 'webmin') {
- # Webmin module, which we can download and install
- local ($host, $port, $page, $ssh) =
- &parse_http_url($pkg->{'updatesurl'});
- local ($mhost, $mport, $mpage, $mssl) =
- &parse_http_url($pkg->{'url'}, $host, $port, $page, $ssl);
- local $mfile;
- ($mfile = $mpage) =~ s/^(.*)\///;
- local $mtemp = &transname($mfile);
- local $error;
- print &text('update_wdownload', $pkg->{'name'}),"
\n";
- &http_download($mhost, $mport, $mpage, $mtemp, \$error, undef, $mssl,
- $webmin::config{'upuser'}, $webmin::config{'uppass'});
- if ($error) {
- print &text('update_ewdownload', $error),"
\n"; - return ( ); - } - print $text{'update_wdownloaded'},"
\n";
-
- # Install the module
- print &text('update_winstall', $pkg->{'name'}),"
\n";
- local $irv = &webmin::install_webmin_module($mtemp, 1, 0);
- if (!ref($irv)) {
- print &text('update_ewinstall', $irv),"
\n"; - } - else { - print $text{'update_winstalled'},"
\n"; - @rv = map { /([^\/]+)$/; $1 } @{$irv->[1]}; - } - } -elsif (defined(&software::update_system_install)) { +if (defined(&software::update_system_install)) { # Using some update system, like YUM or APT &clean_environment(); if ($software::update_system eq $pkg->{'system'}) { diff --git a/system-status/system-status-lib.pl b/system-status/system-status-lib.pl index c963b9b32..c03536af8 100755 --- a/system-status/system-status-lib.pl +++ b/system-status/system-status-lib.pl @@ -100,7 +100,7 @@ my %pkgs = map { $_, 1 } @$pkgs; my $info = &get_collected_info(); if ($info->{'poss'} && &foreign_installed("package-updates")) { &foreign_require("package-updates"); - my @poss = &package_updates::list_possible_updates(2); + my @poss = &package_updates::list_possible_updates(2, 1); $info->{'poss'} = \@poss; } &save_collected_info($info);