Modernize Pandoc::Element usage: stringify($ast) → $ast->string.

1 files changed, 5 insertions, 7 deletions

diff --git a/pandoc-emphasis b/pandoc-emphasis
index 50da37e..35f6076 100755
--- a/pandoc-emphasis
+++ b/pandoc-emphasis
@@ -14,12 +14,12 @@
 use Moops -strict;
 
 use Pandoc::Filter 0.06;
-use Pandoc::Elements;
+use Pandoc::Elements 0.12;
 use Scalar::Util qw(reftype);
 use Clone qw(clone);
 
 use Log::Any qw($log);
-use Log::Any::Adapter ( 'ScreenColoredLevel',
+use Log::Any::Adapter ( 'Screen',
 	use_color => ! -t *STDERR );
 
 # TODO: add class Egg, and coercing roles Exotic and Noble
@@ -117,8 +117,7 @@ sub emphasis {
 		if ( $self->content->[$kid]->name eq 'Quoted'
 			and $self->content->[$kid]->content->[0]->name eq 'Emph'
 		) {
-			my $new_content = stringify(
-				$self->content->[$kid]->content->[0] );
+			my $new_content = $self->content->[$kid]->content->[0]->string;
 			$log->infof( 'emphasis: Quoted+Emph→title: %s',
 				$new_content );
 			# FIXME: LaTeX-encode content
@@ -150,8 +149,7 @@ sub emphasis {
 		if ( $self->content->[$kid]->name eq 'Emph'
 			and $self->content->[$kid]->content->[0]->name eq 'Quoted'
 		) {
-			my $new_content = stringify(
-				$self->content->[$kid]->content->[0] );
+			my $new_content = $self->content->[$kid]->content->[0]->string;
 			$log->infof( 'emphasis: Emph+Quoted→foreign: %s',
 				$new_content );
 			# FIXME: LaTeX-encode content
@@ -164,7 +162,7 @@ sub emphasis {
 		}
 		# foreign markup via quotation mark in Str
 		if ( $self->content->[$kid]->name eq 'Emph'
-			and stringify($self->content->[$kid])
+			and $self->content->[$kid]->string
 #			=~ /^(\")([^\"]+)\"$/
 			=~ /^($doublequote)(^$nodoublequote+)$doublequote$/
 		) {