#!/usr/local/bin/perl
# edit_alias.cgi
# Edit an existing qmail alias

require './qmail-lib.pl';
&ReadParse();
$a = &get_alias($in{'name'});

&header($text{'aform_edit'}, "");
print "<hr>\n";
&alias_form($a);
print "<hr>\n";
&footer("list_aliases.cgi", $text{'aliases_return'});

