3 # Run all the uninstall.pl scripts in module directories
10 @mods = map { local %minfo = &get_module_info($_); \%minfo } @ARGV;
13 @mods = &get_all_module_infos();
17 $mdir = &module_root_directory($m->{'dir'});
18 if (&check_os_support($m) &&
19 -r "$mdir/uninstall.pl") {
20 # Call this module's uninstall function
22 &foreign_require($m->{'dir'}, "uninstall.pl");
23 &foreign_call($m->{'dir'}, "module_uninstall");