X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=t%2Fsolver_git.t;fp=t%2Fsolver_git.t;h=c65d9785cf1f8f0fb0bd92f547aa52b0f0ab37c2;hp=79672398f88cfe9fcdbad92629f68136eda7d2cc;hb=bc54a149d08e9eac58a14c77b3df29fdb2f07fb8;hpb=1d88b8639596a549dd972e113b52f9c2d035d529 diff --git a/t/solver_git.t b/t/solver_git.t index 79672398..c65d9785 100644 --- a/t/solver_git.t +++ b/t/solver_git.t @@ -330,18 +330,16 @@ EOF defined($ENV{PLACK_TEST_EXTERNALSERVER_URI}) or open STDERR, '>&', $olderr or xbail "open: $!"; is($res->code, 200, 'coderepo summary (binfoo)'); - if (ok(-s "$tmpdir/stderr.log")) { - open my $fh, '<', "$tmpdir/stderr.log" or xbail $!; - my $s = do { local $/; <$fh> }; - open $fh, '>', "$tmpdir/stderr.log" or xbail $!; - ok($s =~ s/^fatal: your current branch.*?\n//sm, - 'got current branch warning'); - ok($s =~ s/^.*? exit status=[1-9]+\n\z//sm, - 'got exit status warning'); - is($s, '', 'no unexpected warnings on empty coderepo'); - } + ok(!-s "$tmpdir/stderr.log"); $res = $cb->(GET('/public-inbox/')); is($res->code, 200, 'coderepo summary (public-inbox)'); + + my $tip = 'invalid-'.int(rand(0xdeadbeef)); + $res = $cb->(GET('/public-inbox/?h='.$tip)); + is($res->code, 200, 'coderepo summary on dead branch'); + like($res->content, qr/no commits in `\Q$tip\E', yet/, + 'lack of commits noted'); + $res = $cb->(GET('/public-inbox')); is($res->code, 301, 'redirected');