diff options
author | ivan <ivan> | 2005-04-06 22:50:07 +0000 |
---|---|---|
committer | ivan <ivan> | 2005-04-06 22:50:07 +0000 |
commit | f5f7716c05a5a5bc718211f776bc9e1ee188422e (patch) | |
tree | 5600e17b1360a9998027d9a8e3b037557feefa9e /FS/FS/svc_forward.pm | |
parent | ef3a42418dda9cee559140f501bacd8c8691be25 (diff) |
looks like a domain part for a literally-specified forward src or dst is required, not optional
Diffstat (limited to 'FS/FS/svc_forward.pm')
-rw-r--r-- | FS/FS/svc_forward.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/svc_forward.pm b/FS/FS/svc_forward.pm index b8d55fecb..6dea388a4 100644 --- a/FS/FS/svc_forward.pm +++ b/FS/FS/svc_forward.pm @@ -249,7 +249,7 @@ sub check { # || ! $self->dstsvc; if ( $self->src ) { - $self->src =~ /^([\w\.\-\&]*)(\@([\w\-]+\.)+\w+)?$/ + $self->src =~ /^([\w\.\-\&]*)(\@([\w\-]+\.)+\w+)$/ or return "Illegal src: ". $self->dst; $self->src("$1$2"); } else { @@ -257,7 +257,7 @@ sub check { } if ( $self->dst ) { - $self->dst =~ /^([\w\.\-\&]*)(\@([\w\-]+\.)+\w+)?$/ + $self->dst =~ /^([\w\.\-\&]*)(\@([\w\-]+\.)+\w+)$/ or return "Illegal dst: ". $self->dst; $self->dst("$1$2"); } else { |