update to mailserver integration

diff --git a/FS/FS/part_export/acct_sql.pm b/FS/FS/part_export/acct_sql.pm
index b16f5c2..9f1ae7b 100644 (file)
--- a/FS/FS/part_export/acct_sql.pm
+++ b/FS/FS/part_export/acct_sql.pm
@@ -69,6 +69,7 @@ tie my %postfix_native_mailbox_map, 'Tie::IxHash',
   'uid'      => 'uid',
   'gid'      => 'gid',
   'password' => 'ldap_password',
+  'mail'     => 'domain_slash_username',
 ;
 my $postfix_native_mailbox_map =
   join('\n', map "$_ $postfix_native_mailbox_map{$_}",

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index 003ad90..79e9b25 100644 (file)
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -1597,6 +1597,17 @@ sub ldap_password {
   }
 }
 
+=item domain_slash_username
+
+Returns $domain/$username/
+
+=cut
+
+sub domain_slash_username {
+  my $self = shift;
+  $self->domain. '/'. $self->username. '/';
+}
+
 =item virtual_maildir
 
 Returns $domain/maildirs/$username/