- #if (!DRY) {
- # system("domtool-admin rmdom $_")
- #} else {
- # warn qq|system("domtool-admin rmdom $_")\n|
- #}
- }
-
- if (!DRY) {
- system("domtool-rmuser $u")
- } else {
- warn qq|system("domtool-rmuser $u")\n|
+ # adam was wrong, rmuser is too broad. rmdom + revoke
+ if (!DRY) {
+ system("domtool-admin rmdom $_");
+ system("domtool-admin revoke $u domain $_");
+ } else {
+ warn qq|system("domtool-admin rmdom $_")\n|;
+ warn qq|system("domtool-admin revoke $u domain $_")\n|
+ }