Adding Burguillos logo to the preview.

This commit is contained in:
sergiotarxz 2022-11-13 04:37:53 +01:00
parent fb5c189f11
commit 008f06410b

View File

@ -6,6 +6,7 @@ use strict;
use warnings; use warnings;
use Data::Dumper; use Data::Dumper;
use MIME::Base64;
use Const::Fast; use Const::Fast;
use Mojo::DOM; use Mojo::DOM;
@ -14,9 +15,12 @@ use DateTime::Format::ISO8601;
use SVG; use SVG;
use Capture::Tiny qw/capture/; use Capture::Tiny qw/capture/;
const my $CURRENT_FILE => __FILE__; const my $CURRENT_FILE => __FILE__;
const my $POSTS_DIR => const my $POSTS_DIR =>
path($CURRENT_FILE)->parent->parent->parent->child('content/posts'); path($CURRENT_FILE)->parent->parent->parent->child('content/posts');
const my $BURGUILLOS_LOGO =>
path($CURRENT_FILE)->parent->parent->parent->child('public/img/burguillos.png');
my $iso8601 = DateTime::Format::ISO8601->new; my $iso8601 = DateTime::Format::ISO8601->new;
@ -99,12 +103,12 @@ sub PostPreviewOg {
} }
my $svg = $self->_GenerateSVGPostPreview( $title, \@new_content ); my $svg = $self->_GenerateSVGPostPreview( $title, \@new_content );
my ($stdout) = capture { my ($stdout, $stderr) = capture {
open my $fh, '|-', qw{convert /dev/stdin png:fd:1}; open my $fh, '|-', qw{convert /dev/stdin png:fd:1};
binmode ':utf8', $fh;
print $fh $svg; print $fh $svg;
close $fh; close $fh;
}; };
say STDERR $stderr;
return $stdout; return $stdout;
} }
@ -136,8 +140,16 @@ sub _GenerateSVGPostPreview {
'font-size' => 30, 'font-size' => 30,
} }
); );
$group->image(
x => 10,
y => 5,
width => 40,
height => 40,
-href => 'data:image/png;base64,'.encode_base64($BURGUILLOS_LOGO->slurp)
);
$group->text( $group->text(
x => 10, x => 60,
y => 40, y => 40,
style => { 'font-size' => 50, fill => '#f2eb8c' } style => { 'font-size' => 50, fill => '#f2eb8c' }
)->cdata('Burguillos.info'); )->cdata('Burguillos.info');