# WARNING: this file is generated (from /data/scratch/libapache2-mod-perl2-2.0.4/t/conf/extra.last.conf.in), do not edit
# generated on Tue Nov 24 14:07:46 2009
# 01: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestConfig.pm:955
# 02: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestConfig.pm:973
# 03: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestConfig.pm:1444
# 04: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestConfig.pm:1556
# 05: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestRun.pm:507
# 06: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestRunPerl.pm:90
# 07: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestRun.pm:725
# 08: /data/scratch/libapache2-mod-perl2-2.0.4/Apache-Test/lib/Apache/TestRun.pm:725
# 09: /data/scratch/libapache2-mod-perl2-2.0.4/t/TEST:22

PerlModule Apache2::Module

PerlPostConfigRequire /data/scratch/libapache2-mod-perl2-2.0.4/t/conf/post_config_startup.pl

### --------------------------------- ###
<Perl >
use Apache::Test ();
if (Apache::Test::have_module('mod_alias.c')) {
    push @Alias, ['/perl_sections', '/data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs'];
    $Location{'/perl_sections'} = {
        'PerlInitHandler' => 'ModPerl::Test::add_config',
        'AuthType' => 'Basic',
        'AuthName' => 'PerlSection',
        'PerlAuthenHandler' => 'TestHooks::authen_basic',
    };
}
</Perl>

<Perl >
#Test tied %Location
use TestCommon::TiePerlSection ();
tie %Location, 'TestCommon::TiePerlSection';
$Location{'/tied'} = 'test_tied';

$Apache2::PerlSections::Save = 1;
$Location{'/perl_sections_saved'} = {
    'AuthName' => 'PerlSection',
    };
#This is a comment
$TestDirective::perl::comments="yes";
$TestDirective::perl::PACKAGE = __PACKAGE__;
</Perl>

<Perl >
$Apache2::PerlSections::Save = 1;
$TestDirective::perl::filename = __FILE__;
$TestDirective::perl::dollar_zero = $0;
$TestDirective::perl::line =  __LINE__;
</Perl>

#Handle re-entrant <Perl> sections
<Perl >
    use File::Spec;
    my $file = File::Spec->catfile('/data/scratch/libapache2-mod-perl2-2.0.4/t', 'conf', 'perlsection.conf');
    open my $fh, ">$file" or die "Can't open $file: $!";
    print $fh join "\n", ('<Perl >', '$TestDirective::perl::Included++;', '</Perl>');
    close $fh;
    $Include = $file;
</Perl>

#Deprecated access to Apache2::ReadConfig:: still works
<Perl >
use Apache::Test ();
if (Apache::Test::have_module('mod_alias.c')) {
    push @Apache2::ReadConfig::Alias, 
        ['/perl_sections_readconfig', '/data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs'];
    $Apache2::ReadConfig::Location{'/perl_sections_readconfig'} = {
        'PerlInitHandler'   => 'ModPerl::Test::add_config',
        'AuthType'          => 'Basic',
        'AuthName'          => 'PerlSection',
        'PerlAuthenHandler' => 'TestHooks::authen_basic',
    };
}
</Perl>

<Perl >
$TestDirective::perl::base_server = Apache2::PerlSections->server;
</Perl>

<Perl >
# make sure that these are set at the earliest possible time
die '$ENV{MOD_PERL} not set!' unless $ENV{MOD_PERL};
die '$ENV{MOD_PERL_API_VERSION} not set!'
    unless $ENV{MOD_PERL_API_VERSION} == 2;
</Perl>

Listen 0.0.0.0:8531

<VirtualHost _default_:8531>
    ServerName localhost:8531

  <Perl >
    $TestDirective::perl::vhost_server = Apache2::PerlSections->server;
  </Perl>
</VirtualHost>

### --------------------------------- ###
Perl $TestDirective::perl::worked="yes";

### --------------------------------- ###
=pod

The following line is not seen by Apache

PerlSetVar TestDirective__pod_hidden whatever

=over apache

PerlSetVar TestDirective__pod_over_worked yes

=back

This is some more pod

=cut

PerlSetVar TestDirective__pod_cut_worked yes

#This used to trigger a segfault on startup
#See http://thread.gmane.org/gmane.comp.apache.mod-perl/22750
<IfDefine PERL_USEITHREADS>
Listen 0.0.0.0:8532

<VirtualHost _default_:8532>
    ServerName localhost:8532

   PerlSwitches +inherit
   PerlOptions +Parent
   Perl 1
</VirtualHost>
</IfDefine>

#Single-line $PerlConfig
<Perl>
if (Apache::Test::have_module('mod_alias.c')) {
  $PerlConfig = "Alias /perl_sections_perlconfig_scalar /data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs";
}
</Perl>

#Multi-line $PerlConfig
<Perl>
if (Apache::Test::have_module('mod_alias.c')) {
  $PerlConfig = "Alias /perl_sections_perlconfig_scalar1 /data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs
                 Alias /perl_sections_perlconfig_scalar2 /data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs
                ";
}
</Perl>

#@PerlConfig
<Perl>
if (Apache::Test::have_module('mod_alias.c')) {
  @PerlConfig = ("Alias /perl_sections_perlconfig_array1 /data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs",
                 "Alias /perl_sections_perlconfig_array2 /data/scratch/libapache2-mod-perl2-2.0.4/t/htdocs",
                );
}
</Perl>