disable index section and intro links on homepage
This commit is contained in:
parent
0a52d97864
commit
0c65fbca38
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/head/; revision=50730
1 changed files with 13 additions and 2 deletions
|
@ -929,6 +929,10 @@ $want_to_link_to_this_page = 1;
|
|||
$enable_include_links = 0;
|
||||
$enable_mailto_links = 0;
|
||||
|
||||
my $enable_section_indexes = 0;
|
||||
my $enable_intro = 0;
|
||||
|
||||
|
||||
#
|
||||
# end of config
|
||||
#######################################################################################
|
||||
|
@ -1657,19 +1661,23 @@ sub indexpage {
|
|||
local ($m) = ( $manpath ? $manpath : $manPathDefault );
|
||||
$m = &encode_url($m);
|
||||
|
||||
if ($enable_section_indexes) {
|
||||
print "<b><i>Section Indexes</i></b>:\n";
|
||||
foreach ( '1', '2', '3', '4', '5', '6', '7', '8', '9', 'n' ) {
|
||||
print qq{¤ } if $_ ne '1';
|
||||
print
|
||||
qq{<a href="$BASE?query=($_)&sektion=&apropos=1&manpath=$m&title=Section%20$_Index">$_</a>\n};
|
||||
}
|
||||
}
|
||||
|
||||
if ($enable_intro) {
|
||||
print "<br /><b><i>Explanations of Man Sections:</i></b>\n";
|
||||
foreach ( '1', '2', '3', '4', '5', '6', '7', '8', '9' ) {
|
||||
print qq{¤ } if $_ ne '1';
|
||||
print
|
||||
qq{<a href="$BASE?query=intro&sektion=$_&apropos=0&manpath=$m&title=Introduction%20Section%20$_">intro($_)</a>\n};
|
||||
}
|
||||
}
|
||||
|
||||
if (0) {
|
||||
print "<br />\n<b><i>Quick Reference Categories:</i></b>\n";
|
||||
|
@ -1689,7 +1697,9 @@ qq{¤ <a href="$BASE?query=$_&sektion=&apropos=1&manpath=$m&
|
|||
URL: <a href="$BASE" target="_parent">$www{'home'}$BASE</a><br />
|
||||
ETX
|
||||
|
||||
print "<br />\n";
|
||||
if ($enable_section_indexes || $enable_intro) {
|
||||
print "<br />\n";
|
||||
}
|
||||
&html_footer( 'no_home_link' => 1 );
|
||||
}
|
||||
|
||||
|
@ -1773,9 +1783,10 @@ ETX
|
|||
Output format
|
||||
</form>
|
||||
|
||||
<br/>
|
||||
<a href="$BASE?manpath=$m">home</a> |
|
||||
<a href="$BASE/help.html">help</a>
|
||||
<hr />
|
||||
<hr/>
|
||||
ETX
|
||||
0;
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue