diff options
author | Jonas Smedegaard <dr@jones.dk> | 2017-03-29 12:49:28 +0200 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2017-03-29 14:55:53 +0200 |
commit | 0a0699dc71fc95d02c8079fe45af2b8a261e492e (patch) | |
tree | 165728858fa3e7fdbdbd645813962db56ab17603 /pandoc-memoir | |
parent | b703505823e34ca94f81cca9f4817003b64d90b3 (diff) |
Modernize Pandoc::Element usage: stringify($ast) → $ast->string.
Diffstat (limited to 'pandoc-memoir')
-rwxr-xr-x | pandoc-memoir | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/pandoc-memoir b/pandoc-memoir index 6954877..c15ebe6 100755 --- a/pandoc-memoir +++ b/pandoc-memoir @@ -7,7 +7,7 @@ use feature qw(switch); no if $] >= 5.018, warnings => "experimental::smartmatch"; use Pandoc::Filter 0.06; -use Pandoc::Elements; +use Pandoc::Elements 0.12; my ( $frontmatter_seen, $mainmatter_seen, $backmatter_seen, $toc_seen); @@ -23,7 +23,7 @@ sub matter { my (@replace, @prepend); # push @prepend, RawBlock( 'latex', '\\frontmatter' ) # unless ($toc_seen++); - given (stringify($self)) { + given ($self->string) { when ( /^Table/ and not $frontmatter_seen++ ) { push @replace, RawBlock( 'latex', '{\\hypersetup{linkcolor=black}\\setcounter{tocdepth}{3}\\cleartorecto\\tableofcontents}' @@ -48,6 +48,6 @@ sub matter { sub toc { my $self = shift; return [] - if ( $self->name eq 'Para' and stringify($self) =~ /__TOC__/ ); + if ( $self->name eq 'Para' and $self->string =~ /__TOC__/ ); return; } |