No ext_urls

[public-inbox.git] / t / www_static.t
diff --git a/t/www_static.t b/t/www_static.t

index 10757cb7feb3833d89f40c1e8f7e9d11252a2126..3281751c5cdb95dc79a40cda2b5f62ddaccf1762 100644 (file)
--- a/t/www_static.t
+++ b/t/www_static.t
@@ -1,4 +1,4 @@
-# Copyright (C) 2019-2020 all contributors <meta@public-inbox.org>
+# Copyright (C) 2019-2021 all contributors <meta@public-inbox.org>
  # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
  use strict;
  use warnings;
@@ -6,7 +6,7 @@ use Test::More;
  use PublicInbox::TestCommon;
  my ($tmpdir, $for_destroy) = tmpdir();
  my @mods = qw(HTTP::Request::Common Plack::Test URI::Escape);
-require_mods(@mods);
+require_mods(@mods, 'IO::Uncompress::Gunzip');
  use_ok $_ foreach @mods;
  use_ok 'PublicInbox::WwwStatic';
  
@@ -91,6 +91,15 @@ test_psgi($app->(autoindex => 1, index => []), sub {
         $get->header('Accept-Encoding' => 'gzip');
         $res = $cb->($get);
         is($res->content, "hi", 'got compressed on mtime match');
+
+       $get = GET('/dir/');
+       $get->header('Accept-Encoding' => 'gzip');
+       $res = $cb->($get);
+       my $in = $res->content;
+       my $out = '';
+       IO::Uncompress::Gunzip::gunzip(\$in => \$out);
+       like($out, qr/\A<html>/, 'got HTML start after gunzip');
+       like($out, qr{</html>$}, 'got HTML end after gunzip');
  });
  
  done_testing();