File Coverage

blib/lib/SpeL/Object/MathInline.pm
Criterion Covered Total %
statement 24 24 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 1 1 100.0
total 33 33 100.0


line stmt bran cond sub pod time code
1             # -*- cperl -*-
2             # ABSTRACT: LaTeX MathInline object
3              
4              
5 41     41   326 use strict;
  41         94  
  41         1401  
6 41     41   181 use warnings;
  41         68  
  41         2511  
7             package SpeL::Object::MathInline;
8              
9 41     41   242 use parent 'Exporter';
  41         68  
  41         227  
10 41     41   2407 use Carp;
  41         92  
  41         2592  
11              
12 41     41   214 use Data::Dumper;
  41         93  
  41         2094  
13              
14 41     41   18022 use SpeL::Object::MathUnit;
  41         175  
  41         1984  
15 41     41   227 use SpeL::Object::MathElementList;
  41         75  
  41         3638  
16              
17              
18              
19              
20             sub read {
21 23     23 1 48 my $self = shift;
22 23         53 my ( $level ) = @_;
23            
24 23         138 return $self->{MathUnit}->read( $level );
25             }
26              
27              
28             1;
29              
30             __END__