mirror of
https://github.com/webmin/webmin.git
synced 2026-02-11 09:34:29 +00:00
23 lines
668 B
Perl
Executable File
23 lines
668 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Refresh the list of visible modules
|
|
|
|
require 'webmin-lib.pl';
|
|
&ReadParse();
|
|
|
|
&ui_print_unbuffered_header(undef, $text{'refreshmods_title'}, "", undef, 0, 1);
|
|
|
|
# Re-run install checks
|
|
&flush_webmin_caches();
|
|
print $text{'refreshmods_installed'},"<br>\n";
|
|
($installed, $changed) = &build_installed_modules(1);
|
|
@not = grep { $installed->{$_} eq '0' } (keys %$installed);
|
|
@got = grep { $installed->{$_} ne '0' } (keys %$installed);
|
|
print &text('refeshmods_counts', scalar(@not), scalar(@got)),"<p>\n";
|
|
|
|
# Refresh left frame, if possible
|
|
if (@$changed && defined(&theme_post_change_modules)) {
|
|
&theme_post_change_modules();
|
|
}
|
|
|
|
&ui_print_footer();
|