virtdomain support removed from mkimap?

[Marc G. Fournier]

if this made it to the list ... ignore, just found the answer in the
archives, sorry ...

On Wed, 23 Jul 2003, Marc G. Fournier wrote:

>
> Just updated by CVS to do a fresh installed of cyrus-imapd, and it appears
> that in v1.13.6.5 of mkimap, virtualdomain support was removed ... is
> there a reason?  cvs log shows:
>
> revision 1.13.6.5
> date: 2003/03/06 17:18:22;  author: ken3;  state: Exp;  lines: +1 -82
> strip out all of the per-user directories and hashing.  they are now all
> created on the fly
>
> but mentions nothing about removing the virtdomain support ... ?
>
>
>
> RCS file: /cvs/src/cyrus/tools/mkimap,v
> retrieving revision 1.13.6.4
> retrieving revision 1.13.6.6
> diff -r1.13.6.4 -r1.13.6.6
> 43c43
> < # $Id: mkimap,v 1.13.6.4 2003/03/04 17:16:18 rjs3 Exp $
> ---
> > # $Id: mkimap,v 1.13.6.6 2003/03/09 18:39:36 ken3 Exp $
> 62,73d61
> < $domain = 0;
> <
> < if ("-d" eq $ARGV[0]) {
> <     shift @ARGV;
> <     $domain = $ARGV[0];
> <     unless ($domain) {
> <       print "mkimap: domain name required with -d\n";
> <       exit;
> <     }
> <     shift @ARGV;
> <     printf "i will use domain $domain.\n";
> < }
> 75,94d62
> < $sievedir = "/usr/sieve";
> < $nosievedir = 0;
> < $hashispool = 0;
> < $virtdomains = 0;
> <
> < sub mkdomain {
> <     die "virtdomains not supported" if(!$virtdomains);
> <
> <     my $domain = shift;
> <     my $hash = shift;
> <
> <     mkdir "domain", 0755;
> <     chdir "domain";
> <     if ($hash) {
> <       mkdir substr($domain, 0, 1), 0755;
> <       chdir substr($domain, 0, 1);
> <     }
> <     mkdir "$domain", 0755;
> <     chdir $domain;
> < }
> 106,113d73
> <     if (/^sieveusehomedir:\s+(1|t|yes|on)/) {
> <       $nosievedir = 1;
> <       print "you are storing sieve scripts in user's home directories.\n";
> <     }
> <     if (/^sievedir:\s+(.*)$/) {
> <       $sievedir = $1;
> <       print "you are using $sievedir as your sieve directory.\n";
> <     }
> 121,128d80
> <     if (/^hashimapspool:\s+(1|t|yes|on)/) {
> <       $hashispool = 1;
> <       print "i will also hash partitions.\n";
> <     }
> <     if (/^virtdomains:\s+(1|t|yes|on)/) {
> <       $virtdomains = 1;
> <       print "i can deal with virtual domains.\n";
> <     }
> 135,136c87
> < print "creating $d...\n";
> < mkdir $d, 0755;
> ---
>
>