end
end;
-val addDefaultAlias = begin
+val catchAllAlias = \ mailbox -> aliasPrim catchAllSource (addressTarget mailbox);
+
+val addCatchAllAlias = begin
mailbox <- Mailbox;
- defaultAlias mailbox
+ catchAllAlias mailbox
end;
val addWww = begin
\\ config : Domain ->
domNoWwwNoDefaultAlias d with
config;
- addDefaultAlias;
+ addCatchAllAlias;
end;
val dom =
\\ config : Domain ->
domNoDefaultAlias d with
config;
- addDefaultAlias;
+ addCatchAllAlias;
end;
val nameserver = \host -> dns (dnsNS host);
;;
exim)
/bin/cp /var/domtool/aliases /etc/aliases.hosted
- #/bin/cp /var/domtool/aliases.default /etc/
+ /bin/cp /var/domtool/aliases.default /etc/aliases.wildcard
redo_exim
;;
mailman)