Fixed uidl error

This commit is contained in:
Jamie Cameron
2007-04-19 18:09:11 +00:00
parent 5f26afdfaa
commit fa2a25facb

View File

@@ -48,7 +48,7 @@ $in{'umask_def'} || $in{'umask'} =~ /^[0-7]{4}$/ ||&error($text{'mail_eumask'});
if (&find("pop3_uidl_format", $conf, 2)) {
$uidl = $in{'pop3_uidl_format'} eq '*' ?
$in{'pop3_uidl_format_other'} : $in{'pop3_uidl_format'};
$uidl =~ /^\S+$/ || &error($text{'mail_euid'});
$uidl =~ /^\S+$/ || &error($text{'mail_euidl'});
&save_directive($conf, "pop3_uidl_format", $uidl);
}