Commit Diff
Commit:
7d4298433581a746b52e8eead214a1a7377a3457
Date:
Sat Aug 27 07:08:18 2022
UTC
Message:
move the logo to a separate file
--- GotMArc.pm
+++ GotMArc.pm
@@ -7,13 +7,12 @@ our $logo = <<'EOF';
our @ISA = qw(Exporter);
our @EXPORT_OK = qw($logo san parse initpage endpage);
-our $logo = <<'EOF';
-<a href="https://gameoftrees.org" target="_blank">
- <img srcset='/got-tiny.png, /got-tiny@2x.png 2x'
- src='/got-tiny.png'
- width='64' height='39'
- alt='"GOT", but the "O" is a cute, smiling sun' /></a>
-EOF
+our $logo = do {
+ local $/ = undef;
+ open my $fh, "<", "logo-small.html"
+ or die "can't open logo-small.html: $!";
+ <$fh>;
+};
sub san {
my $str = shift;
--- /dev/null
+++ logo-small.html
@@ -0,0 +1,5 @@
+<a href="https://gameoftrees.org" target="_blank">
+ <img srcset='/got-tiny.png, /got-tiny@2x.png 2x'
+ src='/got-tiny.png'
+ width='64' height='39'
+ alt='"GOT", but the "O" is a cute, smiling sun' /></a>
Omar Polo