|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /usr/libexec/webmin/ |
Upload File : |
#!/usr/bin/perl
# run-uninstalls.pl
# Run all the uninstall.pl scripts in module directories
$no_acl_check++;
do './web-lib.pl';
&init_config();
if (@ARGV > 0) {
@mods = map { local %minfo = &get_module_info($_); \%minfo } @ARGV;
}
else {
@mods = &get_all_module_infos();
}
foreach $m (@mods) {
$mdir = &module_root_directory($m->{'dir'});
if (&check_os_support($m) &&
-r "$mdir/uninstall.pl") {
# Call this module's uninstall function
eval {
&foreign_require($m->{'dir'}, "uninstall.pl");
&foreign_call($m->{'dir'}, "module_uninstall");
};
}
}