improve GOTO handling

[ott/bsta] / bsta_lib.1.pm

diff --git a/bsta_lib.1.pm b/bsta_lib.1.pm
index 7545a90440d9e89b3cd94603a63f1ae2c2189fcc..8add7fab9d0cd622bf5854fe0f95d0bbf6e11de4 100644 (file)
--- a/bsta_lib.1.pm
+++ b/bsta_lib.1.pm
@@ -1177,7 +1177,10 @@ sub print_viewer_page {
                merge_url(
                        {'path' => $viewer_url},
                        {
-                               'query' => {'g' => 1},
+                               'query' => {
+                                       'g' => 1,
+                                       'b' => $text_mode
+                               },
                                'fragment' => 'goto'
                        }
                );
@@ -1498,8 +1501,8 @@ sub print_viewer_page {
        print $fh '<a href="'.$_goto_url.'">GOTO</a>'."\n";
        print $fh '     <span style="float: right;">'."\n      ";
        if (
-               ($text_mode == TEXT_MODE->{'normal'}) &&
-               (!$goto)
+               ($text_mode == TEXT_MODE->{'normal'})
+               # && (!$goto)
        ){
                if ($show_words) {
                        print $fh '<a href="'.$_words_url.'">'.$words_link_text.'</a> | ';