diff --git a/lib/cyberman/Domains.pm b/lib/cyberman/Domains.pm index ac61cf5..3759d06 100644 --- a/lib/cyberman/Domains.pm +++ b/lib/cyberman/Domains.pm @@ -115,6 +115,12 @@ post '/domains/:name/remove' => sub { "name" => param("name"), }, ); + database->quick_delete( + "record", + { + "domainid" => $domain->{"id"}, + }, + ); template redir => { redir => "../../domains?removed=$domain->{name}",