From c9cf025fadfe043f0f2f679e10d1207d8a158bb6 Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Sun, 7 Apr 2024 17:01:31 +0200 Subject: Adding debian version 2.4.57-2. Signed-off-by: Daniel Baumann --- debian/perl-framework/t/modules/directorymatch.t | 26 ++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100644 debian/perl-framework/t/modules/directorymatch.t (limited to 'debian/perl-framework/t/modules/directorymatch.t') diff --git a/debian/perl-framework/t/modules/directorymatch.t b/debian/perl-framework/t/modules/directorymatch.t new file mode 100644 index 0000000..7b4fa38 --- /dev/null +++ b/debian/perl-framework/t/modules/directorymatch.t @@ -0,0 +1,26 @@ +use strict; +use warnings FATAL => 'all'; + +use Apache::Test; +use Apache::TestRequest; +use Apache::TestUtil; +use Apache::TestConfig (); + +## +## directorymatch tests +## + +my @ts = ( + { url => "/index.html", code => 200, hname => "DMMATCH1"}, + # TODO: PR41867 (DirectoryMatch matches files) +); + +plan tests => 2* scalar @ts, have_module 'headers'; + +for my $t (@ts) { + my $r = GET $t->{'url'}; + ok t_cmp($r->code, $t->{code}, "code for " . $t->{'url'}); + ok t_cmp($r->header($t->{'hname'}), "1", "check for " . $t->{'hname'}); +} + + -- cgit v1.2.3