From: b Date: Thu, 4 Jan 2024 21:11:05 +0000 (+0000) Subject: possibility of other frame types X-Git-Tag: v1.0.0~20 X-Git-Url: http://bicyclesonthemoon.info/git-projects/?a=commitdiff_plain;h=c195115757be8adc8fda8965af3a6fe9a337c97b;p=botm%2Foldlogs possibility of other frame types --- diff --git a/bsta.css b/bsta.css index 48d481d..f6d6a32 100644 --- a/bsta.css +++ b/bsta.css @@ -124,11 +124,30 @@ div#framespace img#frame { border: solid #0057af; - border-width:27px 38px; + border-width: 27px 38px; padding: 0px; margin: 0px; } +img#frame.double +{ + border-width: 54px 38px; +} + +img#frame.full +{ + border-width: 0px; +} + +img#frame.bftf +{ + padding-top: 60px; + padding-bottom: 60px; + padding-left: 85px; + padding-right: 85px; + background-color: #d9ecff; +} + img#frame:hover { border-color: #bb6622; diff --git a/bsta_lib.1.pm b/bsta_lib.1.pm index 9d55976..005cde8 100644 --- a/bsta_lib.1.pm +++ b/bsta_lib.1.pm @@ -870,6 +870,7 @@ sub print_viewer_page { my $width = int($frame_data->{'width'}); my $height = int($frame_data->{'height'}); + my $frame_type = $frame_data->{'frametype'}; my $timer_color_h = (($timer_unlocked >= 1) || ($ong_state >= STATE->{'ready'})) ? 'br' : 'ni'; my $timer_color_m = (($timer_unlocked >= 2) || ($ong_state >= STATE->{'ready'})) ? 'br' : 'ni'; @@ -1066,9 +1067,10 @@ sub print_viewer_page { my $_frame_next_url = html_entity_encode_dec($frame_next_url , 1); my $_frame_full_url = html_entity_encode_dec($frame_full_url , 1); - my $_story = html_entity_encode_dec($story, 1); - my $_title = html_entity_encode_dec($title, 1); - my $_command = html_entity_encode_dec($command, 1); + my $_story = html_entity_encode_dec($story , 1); + my $_title = html_entity_encode_dec($title , 1); + my $_command = html_entity_encode_dec($command , 1); + my $_frame_type = html_entity_encode_dec($frame_type, 1); my $_website_name = html_entity_encode_dec(WEBSITE_NAME(), 1); @@ -1131,7 +1133,7 @@ sub print_viewer_page { print $fh ' '."\n"; print $fh '
'."\n"; - print $fh ' '.$frame.''."\n"; + print $fh ' '.$frame.''."\n"; print $fh '
'."\n"; print $fh '
'."\n";