Skip to content

Commit

Permalink
Improve testing regexps
Browse files Browse the repository at this point in the history
  • Loading branch information
DarwinAwardWinner committed Oct 23, 2013
1 parent 66d813c commit 3b6cef9
Show file tree
Hide file tree
Showing 2 changed files with 10 additions and 8 deletions.
9 changes: 5 additions & 4 deletions t/readmeinbuild.t
Expand Up @@ -39,8 +39,8 @@ my %tests = (
],
pod => [
[ qr/^=head1\s+SYNOPSIS/m, "POD header" ],
[ qr/B<.*>/, "POD bold formatting" ],
[ qr/I<.*>/, "POD italic formatting" ],
[ qr/B<.*?>/, "POD bold formatting" ],
[ qr/I<.*?>/, "POD italic formatting" ],
],
html => [
[ qr/<html>/, "HTML code" ],
Expand All @@ -50,11 +50,12 @@ my %tests = (
markdown => [
[ qr/^# SYNOPSIS\s*$/m, "Markdown header" ],
[ qr/__[^\s_]+__/, "Markdown bold formatting" ],
[ qr/[^_]_[^\s_]+_[^_]/, "Markdown italic formatting" ],
[ qr/(?<!_)_[^\s_]+_(?!_)/, "Markdown italic formatting" ],
],
never => [
[ qr/\r/, "Carriage return", ],
]
[ qr/^__END__$/m, "Perl code __END__ marker", ],
],
);

my @possible_types = keys %$Dist::Zilla::Plugin::ReadmeAnyFromPod::_types;
Expand Down
9 changes: 5 additions & 4 deletions t/readmeinroot.t
Expand Up @@ -39,8 +39,8 @@ my %tests = (
],
pod => [
[ qr/^=head1\s+SYNOPSIS/m, "POD header" ],
[ qr/B<.*>/, "POD bold formatting" ],
[ qr/I<.*>/, "POD italic formatting" ],
[ qr/B<.*?>/, "POD bold formatting" ],
[ qr/I<.*?>/, "POD italic formatting" ],
],
html => [
[ qr/<html>/, "HTML code" ],
Expand All @@ -50,11 +50,12 @@ my %tests = (
markdown => [
[ qr/^# SYNOPSIS\s*$/m, "Markdown header" ],
[ qr/__[^\s_]+__/, "Markdown bold formatting" ],
[ qr/[^_]_[^\s_]+_[^_]/, "Markdown italic formatting" ],
[ qr/(?<!_)_[^\s_]+_(?!_)/, "Markdown italic formatting" ],
],
never => [
[ qr/\r/, "Carriage return", ],
]
[ qr/^__END__$/m, "Perl code __END__ marker", ],
],
);

my @possible_types = keys %$Dist::Zilla::Plugin::ReadmeAnyFromPod::_types;
Expand Down

0 comments on commit 3b6cef9

Please sign in to comment.