Finishing the preview branding.

This commit is contained in:
sergiotarxz 2023-05-17 04:49:36 +02:00
parent 19bfe3b9b4
commit 6d62440588
1 changed files with 11 additions and 4 deletions

View File

@ -53,18 +53,25 @@ sub _GenerateSVGPreviewHeaderBar ( $self, $svg, $group, $site_name ) {
y => 0, y => 0,
width => 1200, width => 1200,
height => 50, height => 50,
style => { fill => 'blueviolet' } style => { fill => '#5C8CED' }
); );
$group->rect( $group->rect(
x => 0, x => 0,
y => 50, y => 50,
width => 1200, width => 1200,
height => 627, height => 627,
style => { fill => '#F8F8FF' } style => { fill => 'ghostwhite' }
); );
my $owlcode_logo_png = path( $self->_ToPng($OWLCODE_LOGO) ); my $owlcode_logo_png = path( $self->_ToPng($OWLCODE_LOGO) );
$group->image( $group->rect(
x => 10,
y => 5,
width => 40,
height => 40,
style => { fill => 'ghostwhite' },
);
$group->image(
x => 10, x => 10,
y => 5, y => 5,
width => 40, width => 40,
@ -75,7 +82,7 @@ sub _GenerateSVGPreviewHeaderBar ( $self, $svg, $group, $site_name ) {
$group->text( $group->text(
x => 60, x => 60,
y => 40, y => 40,
style => { 'font-size' => 50, fill => '#f2eb8c' } style => { 'font-size' => 50, fill => 'azure' }
)->cdata($site_name); )->cdata($site_name);
} }