* Stas Bekman wrote:
> +1, but see a few minor code comments below
well, some further comments below.
> my @out_config = ();
>
> since it might be used later without anything pushed in (so it'd be undef).
an array can't be undef, but I've no problem to add the =() to make it obvious
;-)
>>>+ if ($self->{vhosts}->{$module}->{namebased} < 2) {
>>>+ #extra config that should go *outside* the <VirtualHost ...>
>>>+ @out_config = ([Listen => $port]);
>
> but originally that code was always running, why it's conditioned? shouldn't
> it always run?
No. If you have more than one VH at one port, you need *one* Listen, no more.
> indent:
>
> + line => "$indent<VirtualHost " . ($namebased ? '*' :
> '_default_').
I'm assuming you didn't write the linebreak. So isn't a 80 char/line limit
here?
>>>+ ++$vhost->{namebased};
>
> normally we used to write i++ in perl, but it's fine as well ;)
Heh, the optimizer probably does it's work ;) Okay.
nd