#!/usr/bin/perl

print "Content-Type: Text/HTML\n\n";

use CGI ':standard';
use Vpanel 1.00;
require $header;
require $accountinfo;

$domainname = find_domain ($mainuser);

# Define the tab which appears to the front
$tab_section = $tabnum_email;

# Output the content associated with this tab
print "<body class=section-$tab_section>";

# display tabs
require $tabdisplay;

print_header("Deletion of a 'multi-drop' ('catch-all') email account for $domainname");

print "Thank you. You have chosen to delete your multidrop. ";

print "If you need to create new email addresses and email accounts, please wait until this change has been activated.";

show_time_to_change();

$ret = php_request ("setMultiDrop", "scope=domain:$domainname", "multiDrop=no", "multiDropTarget= ");

require $footer;
