Add a new EmailPrimaryDomain prop to user accounts

To control how unqualified pseudonymes are created in LDAP

root/etc/e-smith/events/actions/update-ldap-pseudonyms

@@ -119,7 +119,7 @@ foreach my $acct (@accounts){
 
     my @alias = ();
     foreach (@pseudo){
-        $_ = $_ . "\@$domain" if $_ !~ /\@/;
+        $_ = $_ . "\@" . ($acct->prop('EmailPrimaryDomain') || $domain) if $_ !~ /\@/;
         push (@alias, unac_string(decode('utf-8',$_)));
     }
     @alias = uniq(@alias);