1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
$PREFIX="PERL";
$MAX_SPLIT_DEPTH=+3;
$MAX_LINK_DEPTH=2;
$SHOW_SECTION_NUMBERS=1;
$default_language='english';
$TITLE_LANGUAGE='english';
$WORDS_IN_NAVIGATION_PANEL_TITLES=6;
$iconsizes{'previous'}='WIDTH="40" HEIGHT="30"';
$iconsizes{'up'}='WIDTH="30" HEIGHT="40"';
$iconsizes{'next'}='WIDTH="40" HEIGHT="30"';
$iconsizes{'contents'}='WIDTH="67" HEIGHT="39"';
sub bot_navigation_panel {
"<HR>\n".
"<TABLE width=\"100%\">".
"<TR>".
"<TD width=\"33%\" align=left>".$PREVIOUS."</TD>".
"<TD width=\"33%\" align=center>".$UP." ".$CONTENTS."</TD>".
"<TD width=\"33%\" align=right>".$NEXT."</TD>".
"</TR></TABLE>"."\n<HR>"}
sub top_navigation_panel {
my $MT;
"<HR>\n".
"<TABLE width=\"100%\">".
"<TR>".
"<TD width=\"33%\" align=left>".$PREVIOUS."</TD>".
"<TD width=\"33%\" align=center>".$UP." ".$CONTENTS."</TD>".
"<TD width=\"33%\" align=right>".$NEXT."</TD>".
"</TR></TABLE>"."\n<HR>"}
|
