Commit e3eaf7a8 authored by Christopher Alfeld's avatar Christopher Alfeld
Browse files

Clears virt_names table.

parent 6ff2610b
......@@ -70,6 +70,13 @@ if (&tbs_exec("named_setup")) {
#
}
&tbs_out("Clearing virt_names table\n");
foreach (@nodes) {
$sth = $dbh->prepare("DELETE from virt_names where src_node_id = \"$_\" or dest_node_id = \"$_\"");
$sth->execute;
$sth->finish;
}
&tbs_out("Cleanup finished - " . &ctime(time) . "\n");
0;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment