summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>1999-02-12 19:00:38 (GMT)
committerFred Drake <fdrake@acm.org>1999-02-12 19:00:38 (GMT)
commit7a9ed71e95872dd9c43e63488e80074702d33975 (patch)
tree0018ca21cee219fa74c64871d72ffcf2c46da20d /Doc/perl
parent26b698fa4de6b06cf0950c8da781596a3860eca3 (diff)
downloadcpython-7a9ed71e95872dd9c43e63488e80074702d33975.zip
cpython-7a9ed71e95872dd9c43e63488e80074702d33975.tar.gz
cpython-7a9ed71e95872dd9c43e63488e80074702d33975.tar.bz2
Moved the navigation-bar background color to a variable.
Diffstat (limited to 'Doc/perl')
-rw-r--r--Doc/perl/l2hinit.perl3
1 files changed, 2 insertions, 1 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 43d5e1a..180874e 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -109,13 +109,14 @@ $icons{'blank'} = 'blank.' . $IMAGE_TYPE;
$CUSTOM_BUTTONS = '';
$BLANK_ICON = "\n<td>" . img_tag('blank.' . $IMAGE_TYPE) . "</td>";
+$NAV_BGCOLOR = " bgcolor=\"#99CCFF\"";
sub make_nav_panel{
("<table width=\"100%\" cellpadding=0 cellspacing=0>\n<tr>"
. "\n<td>$NEXT</td>"
. "\n<td>$UP</td>"
. "\n<td>$PREVIOUS</td>"
- . "\n<td align=center bgcolor=\"#99CCFF\" width=\"100%\">"
+ . "\n<td align=center$NAV_BGCOLOR width=\"100%\">"
. "\n <b>$t_title</b></td>"
. ($CONTENTS ? "\n<td>$CONTENTS</td>" : $BLANK_ICON)
. "\n<td>$CUSTOM_BUTTONS</td>" # module index