~ubuntu-branches/debian/sid/libembperl-perl/sid

« back to all changes in this revision

Viewing changes to test/html/registry/Execute.htm

  • Committer: Bazaar Package Importer
  • Author(s): Gunnar Wolf
  • Date: 2007-03-26 11:49:17 UTC
  • mfrom: (3.1.2 edgy)
  • Revision ID: james.westby@ubuntu.com-20070326114917-717f30vfkvbdasd5
Tags: 2.2.0-1.2
* Non-maintainer upload.
* No longer spawns Apache processes to run the test scripts, as it leads
  to FTBFS (Closes: #416016)

Show diffs side-by-side

added added

removed removed

Lines of Context:
12
12
# workaround for broken $r -> chdir_file in Apache::Registry on ActiveState perl
13
13
use Cwd ;
14
14
use File::Basename ;
15
 
eval { require Apache::compat } ;
16
 
$@ = '' ;
17
 
 
 
15
if ($Embperl::modperlapi < 2)
 
16
    {
 
17
    eval { require Apache::compat } ;
 
18
    $@ = '' ;
 
19
    }
 
20
else
 
21
    {
 
22
    eval { require Apache2::compat } ;
 
23
    $@ = '' ;
 
24
    }
 
25
    
18
26
my $fn = $r -> filename ;
19
27
chdir(dirname ($fn)) ;
20
28