Finishing the preview branding.

This commit is contained in:
sergiotarxz 2023-05-17 04:49:36 +02:00
parent 19bfe3b9b4
commit 6d62440588

View File

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