fix regex
authorivan <ivan>
Mon, 11 Jul 2005 12:22:23 +0000 (12:22 +0000)
committerivan <ivan>
Mon, 11 Jul 2005 12:22:23 +0000 (12:22 +0000)
bin/postfix.export

index dbb08ce..61380da 100755 (executable)
@@ -40,7 +40,7 @@ foreach my $export ( @exports ) {
     my $srcsvc_acct = $svc_forward->srcsvc_acct;
     if ( $srcsvc_acct ) {
       ( $username, $domain ) = ( $srcsvc_acct->username, $srcsvc_acct->domain );
     my $srcsvc_acct = $svc_forward->srcsvc_acct;
     if ( $srcsvc_acct ) {
       ( $username, $domain ) = ( $srcsvc_acct->username, $srcsvc_acct->domain );
-    } elsif ( $svc_forward->src =~ /([^@]*)\@([^@]+)$/ ) {
+    } elsif ( $svc_forward->src =~ /^([^@]*)\@([^@]+)$/ ) {
       ( $username, $domain ) = ( $1, $2 );
     } else {
       die "bad svc_forward record?  svcnum ". $svc_forward->svcnum. "\n";
       ( $username, $domain ) = ( $1, $2 );
     } else {
       die "bad svc_forward record?  svcnum ". $svc_forward->svcnum. "\n";