File Coverage

blib/lib/Markdent/Event/Preformatted.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package Markdent::Event::Preformatted;
2              
3 35     35   288 use strict;
  35         90  
  35         1311  
4 35     35   216 use warnings;
  35         84  
  35         1125  
5 35     35   222 use namespace::autoclean;
  35         85  
  35         322  
6              
7             our $VERSION = '0.40';
8              
9 35     35   3367 use Markdent::Types;
  35         100  
  35         326  
10              
11 35     35   907549 use Moose;
  35         121  
  35         403  
12 35     35   253995 use MooseX::StrictConstructor;
  35         99  
  35         351  
13              
14             has text => (
15             is => 'ro',
16             isa => t('Str'),
17             required => 1,
18             );
19              
20             with 'Markdent::Role::Event' => { event_class => __PACKAGE__ };
21              
22             __PACKAGE__->meta->make_immutable;
23              
24             1;
25              
26             # ABSTRACT: An event for preformatted text
27              
28             __END__
29              
30             =pod
31              
32             =encoding UTF-8
33              
34             =head1 NAME
35              
36             Markdent::Event::Preformatted - An event for preformatted text
37              
38             =head1 VERSION
39              
40             version 0.40
41              
42             =head1 DESCRIPTION
43              
44             This class represents a block of preformatted text.
45              
46             =head1 ATTRIBUTES
47              
48             This class has the following attributes:
49              
50             =head2 text
51              
52             The text in the block, including newlines and additional leading space, etc.
53              
54             =head1 ROLES
55              
56             This class does the L<Markdent::Role::Event> role.
57              
58             =head1 BUGS
59              
60             See L<Markdent> for bug reporting details.
61              
62             Bugs may be submitted at L<https://github.com/houseabsolute/Markdent/issues>.
63              
64             I am also usually active on IRC as 'autarch' on C<irc://irc.perl.org>.
65              
66             =head1 SOURCE
67              
68             The source code repository for Markdent can be found at L<https://github.com/houseabsolute/Markdent>.
69              
70             =head1 AUTHOR
71              
72             Dave Rolsky <autarch@urth.org>
73              
74             =head1 COPYRIGHT AND LICENSE
75              
76             This software is copyright (c) 2021 by Dave Rolsky.
77              
78             This is free software; you can redistribute it and/or modify it under
79             the same terms as the Perl 5 programming language system itself.
80              
81             The full text of the license can be found in the
82             F<LICENSE> file included with this distribution.
83              
84             =cut