From 6280eec8ca967f8704f2e8183f19a8325d5f1879 Mon Sep 17 00:00:00 2001
From: b <rowerynaksiezycu@gmail.com>
Date: Sun, 2 Mar 2025 17:41:16 +0000
Subject: [PATCH] don't sow underlinks on launch index frame 0
---
bsta_lib.1.pm | 57 +++++++++++++++++++++++++++------------------------
1 file changed, 30 insertions(+), 27 deletions(-)
diff --git a/bsta_lib.1.pm b/bsta_lib.1.pm
index c8dc266..7fe9a8e 100644
--- a/bsta_lib.1.pm
+++ b/bsta_lib.1.pm
@@ -970,6 +970,7 @@ sub print_viewer_page {
);
my $show_command_link = ($next_available || (!$access));
my $show_command_cursor = ((!$next_available) || ($command eq ''));
+ my $show_underlinks = !$launch;
my $show_words = ($password_ok || ($access && !$launch));
my $frame_indirect = !(
@@ -1325,35 +1326,37 @@ sub print_viewer_page {
print $fh "<br>\n";
print $fh " </div>\n";
- print $fh ' <div id="underlinks">'."\n ";
-
- unless (($frame == 0) && $static) {
- print $fh '<a href="'.$_base_url.'">Once again</a> | ';
- }
- if ($prev_available) {
- print $fh '<a href="'.$_viewer_prev_url.'">Before</a> | ';
- }
- unless ($frame == $last_frame) {
- print $fh '<a href="'.$_viewer_last_url.'">Now</a> | ';
- }
- print $fh '<a href="'.$_goto_url.'">GOTO</a>'."\n";
- print $fh ' <span style="float: right;">'."\n ";
- if (
- ($text_mode == TEXT_MODE->{'normal'})
- # && (!$goto)
- ){
- if ($show_words) {
- print $fh '<a href="'.$_words_url.'">'.$words_link_text.'</a> | ';
+ if ($show_underlinks) {
+ print $fh ' <div id="underlinks">'."\n ";
+
+ unless (($frame == 0) && $static) {
+ print $fh '<a href="'.$_base_url.'">Once again</a> | ';
}
+ if ($prev_available) {
+ print $fh '<a href="'.$_viewer_prev_url.'">Before</a> | ';
+ }
+ unless ($frame == $last_frame) {
+ print $fh '<a href="'.$_viewer_last_url.'">Now</a> | ';
+ }
+ print $fh '<a href="'.$_goto_url.'">GOTO</a>'."\n";
+ print $fh ' <span style="float: right;">'."\n ";
+ if (
+ ($text_mode == TEXT_MODE->{'normal'})
+ # && (!$goto)
+ ){
+ if ($show_words) {
+ print $fh '<a href="'.$_words_url.'">'.$words_link_text.'</a> | ';
+ }
+ }
+ else {
+ print $fh '<a href="'.$_viewer_url.'">Without</a> | ';
+ }
+ print $fh '<a href="'.$_info_url.'">Info</a> | ';
+ print $fh '<a href="'.$_bbcode_url.'">BB</a>';
+ print $fh "\n </span>\n";
+
+ print $fh " </div>\n";
}
- else {
- print $fh '<a href="'.$_viewer_url.'">Without</a> | ';
- }
- print $fh '<a href="'.$_info_url.'">Info</a> | ';
- print $fh '<a href="'.$_bbcode_url.'">BB</a>';
- print $fh "\n </span>\n";
-
- print $fh " </div>\n";
if ($goto) {
print $fh ' <div class="underlinks" id="goto">'."\n";
--
2.30.2