Moved the navigation-bar background color to a variable.

This commit is contained in:
Fred Drake 1999-02-12 19:00:38 +00:00
parent 26b698fa4d
commit 7a9ed71e95

View file

@ -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