$NetBSD: patch-ac,v 1.1 2006/05/19 17:14:53 jlam Exp $ --- run-uninstalls.pl.orig Tue Apr 4 23:12:35 2006 +++ run-uninstalls.pl @@ -6,7 +6,14 @@ $no_acl_check++; do './web-lib.pl'; &init_config(); -foreach $m (&get_all_module_infos()) { +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") {