mod_perl bug (mod_perl 1.21; Apache 1.3.9).

[John Hughes]

I have a virtual host to handle https.  The URL's on the main host and the
virtual host can be pretty similar.  Somethimes mod_perl gets confused,
thinking that it wants a script from the main host when it actualy should
be getting one for the virtual host.

What's going wrong is that once $Apache::Registry::NameWithVirtualHost is
set to zero it never gets set back to one.

Here's a pretty trivial fix.

-- 
John Hughes <[EMAIL PROTECTED]>, 
        CalvaEDI SA.                            Tel: +33-1-4313-3131
        66 rue du Moulin de la Pointe,          Fax: +33-1-4313-3139
        75013 PARIS.
--- mod_perl-1.21/src/modules/perl/mod_perl.c.orig      Thu Jul  1 20:17:38 1999
+++ mod_perl-1.21/src/modules/perl/mod_perl.c   Tue Jan 18 10:42:34 2000
@@ -774,10 +774,8 @@
     SAVETMPS;
 
     if((nwvh = ApachePerlRun_name_with_virtualhost())) {
-       if(!r->server->is_virtual) {
-           SAVESPTR(nwvh);
-           sv_setiv(nwvh, 0);
-       }
+       SAVESPTR(nwvh);
+       sv_setiv (nwvh, r->server->is_virtual);
     }
 
     if (siggv) {