File Coverage

blib/lib/Markdent/Dialect/Theory/SpanParser.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Markdent::Dialect::Theory::SpanParser;
2              
3 4     4   2710 use strict;
  4         11  
  4         143  
4 4     4   24 use warnings;
  4         10  
  4         161  
5 4     4   27 use namespace::autoclean;
  4         11  
  4         35  
6              
7             our $VERSION = '0.40';
8              
9 4     4   397 use Moose::Role;
  4         9  
  4         49  
10              
11             with 'Markdent::Role::Dialect::SpanParser';
12              
13             around _build_escapable_chars => sub {
14             my $orig = shift;
15             my $self = shift;
16             my $chars = $self->$orig();
17              
18             return [ @{$chars}, qw( | : ) ];
19             };
20              
21             1;
22              
23             # ABSTRACT: Span parser for Theory's proposed Markdown extensions
24              
25             __END__
26              
27             =pod
28              
29             =encoding UTF-8
30              
31             =head1 NAME
32              
33             Markdent::Dialect::Theory::SpanParser - Span parser for Theory's proposed Markdown extensions
34              
35             =head1 VERSION
36              
37             version 0.40
38              
39             =head1 DESCRIPTION
40              
41             This role is applied to a L<Markdent::Parser::SpanParser> in order to allow the
42             pipe (|) and colon (:) characters to be backslash-escaped. These are used to
43             mark tables, so they need to be escapeable.
44              
45             =head1 ROLES
46              
47             This role does the L<Markdent::Role::Dialect::SpanParser> role.
48              
49             =head1 BUGS
50              
51             See L<Markdent> for bug reporting details.
52              
53             Bugs may be submitted at L<https://github.com/houseabsolute/Markdent/issues>.
54              
55             I am also usually active on IRC as 'autarch' on C<irc://irc.perl.org>.
56              
57             =head1 SOURCE
58              
59             The source code repository for Markdent can be found at L<https://github.com/houseabsolute/Markdent>.
60              
61             =head1 AUTHOR
62              
63             Dave Rolsky <autarch@urth.org>
64              
65             =head1 COPYRIGHT AND LICENSE
66              
67             This software is copyright (c) 2021 by Dave Rolsky.
68              
69             This is free software; you can redistribute it and/or modify it under
70             the same terms as the Perl 5 programming language system itself.
71              
72             The full text of the license can be found in the
73             F<LICENSE> file included with this distribution.
74              
75             =cut