smeserver-base/root/etc/e-smith/db/configuration/migrate/50RemoveObsoleteServices

11 lines
257 B
Plaintext
Raw Normal View History

{
# Remove old, unused services from the configuration database
my @services = qw(haldaemon smolt udev-post messagebus ctrlaltdel pptpd klogd);
foreach my $service (@services){
my $entry = $DB->get($service);
$entry->delete if $entry;
}
}