line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
1
|
|
|
1
|
|
21075
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
34
|
|
2
|
1
|
|
|
1
|
|
5
|
use warnings; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
59
|
|
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
package Rubric::Entry::Formatter::Markdown; |
5
|
|
|
|
|
|
|
{ |
6
|
|
|
|
|
|
|
$Rubric::Entry::Formatter::Markdown::VERSION = '0.555'; |
7
|
|
|
|
|
|
|
} |
8
|
|
|
|
|
|
|
# ABSTRACT: format entries with Markdown (duh!) |
9
|
|
|
|
|
|
|
|
10
|
|
|
|
|
|
|
|
11
|
1
|
|
|
1
|
|
1073
|
use Text::Markdown (); |
|
1
|
|
|
|
|
50308
|
|
|
1
|
|
|
|
|
24
|
|
12
|
1
|
|
|
1
|
|
1422
|
use Text::MultiMarkdown (); |
|
1
|
|
|
|
|
16476
|
|
|
1
|
|
|
|
|
124
|
|
13
|
|
|
|
|
|
|
|
14
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
sub as_html { |
16
|
0
|
|
|
0
|
1
|
|
my ($class, $arg, $config) = @_; |
17
|
0
|
|
|
|
|
|
my %config = %$config; |
18
|
0
|
0
|
|
|
|
|
my $md = (delete $config{multimarkdown}) |
19
|
|
|
|
|
|
|
? 'Text::MultiMarkdown' |
20
|
|
|
|
|
|
|
: 'Text::Markdown'; |
21
|
|
|
|
|
|
|
|
22
|
0
|
|
|
|
|
|
return $md->new(%$config)->markdown($arg->{text}); |
23
|
|
|
|
|
|
|
} |
24
|
|
|
|
|
|
|
|
25
|
|
|
|
|
|
|
sub as_text { |
26
|
0
|
|
|
0
|
1
|
|
my ($class, $arg) = @_; |
27
|
|
|
|
|
|
|
|
28
|
0
|
|
|
|
|
|
return $arg->{text}; |
29
|
|
|
|
|
|
|
} |
30
|
|
|
|
|
|
|
|
31
|
|
|
|
|
|
|
1; |
32
|
|
|
|
|
|
|
|
33
|
|
|
|
|
|
|
__END__ |