X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FGitalist.git;a=blobdiff_plain;f=t%2Fapp-mech-rootpage.t;h=cc6f71fb9540b570c85cf0adfba68174b8e080fe;hp=ff4d5a402565365147c71f3133e5566f23bc62d4;hb=2d376b54de7abb49a0b8d80f996c698933503d22;hpb=aebe9a0e6beff3cb67fcfd138899ce91e91d61b9 diff --git a/t/app-mech-rootpage.t b/t/app-mech-rootpage.t index ff4d5a4..cc6f71f 100644 --- a/t/app-mech-rootpage.t +++ b/t/app-mech-rootpage.t @@ -11,7 +11,7 @@ MECH->get_ok('/'); my $uri = $row->findnodes('.//a')->[0]->attr('href'); my ($repos_name) = $uri =~ m{^http://localhost/([\w\.]+)$}; ok $repos_name, "Repos name $repos_name"; - like $row->findnodes('.//a')->[1]->as_text, qr/^[\w\s;'\.]+$/, 'Have description' + like $row->findnodes('.//a')->[1]->as_text, qr{^[\w\s/;',\.]+$}, 'Have description' unless $repos_name eq 'nodescription'; like $row->findnodes('.//td[@class="time-since"')->[0]->as_text, qr/^(never|\d\s+(years|months)\s+ago)$/, 'Last change looks ok';