->{title}, [] );
}
################ Page settings ################
#
# Copied from GImager.
use JSON::PP ();
# Setup fonts.
sub initfonts {
my ( $self ) = @_;
}
# API: pagesettings (inheritabl
fault} ) || {};
if ( open( my $fd, "<:utf8", $options->{pagedefs} || "pagedefs.json" ) ) {
local $/;
$ret = JSON::PP->new->utf8->relaxed->decode( scalar( <$fd> ) );
$fd->close;
}
elsif
>{pdf}->{papersize}}
}
if ( 0 ) {
open( my $fd, '>:utf8', 'pagedefs.new' );
$fd->print(JSON::PP->new->utf8->canonical->indent(4)->pretty->encode($ret));
$fd->close;
}
$self->{ps}