img_tag(), top_navigation_panel(): Generate markup the same case as other

functions in this file.
This commit is contained in:
Fred Drake 1997-12-18 14:16:46 +00:00
parent 8da9e6a8a0
commit 616b23b2e4
1 changed files with 7 additions and 7 deletions

View File

@ -20,8 +20,8 @@ sub img_tag {
( ($icon =~ /(gif)/) ? ( ($icon =~ /(gif)/) ?
do { do {
$icon =~ /(up|next|previous|next_page|previous_page|change_begin|change_end|change_delete|contents|index)/; $icon =~ /(up|next|previous|next_page|previous_page|change_begin|change_end|change_delete|contents|index)/;
join('','<IMG ',$iconsizes{$1},' ALIGN=BOTTOM ALT="',$1, join('','<img ',$iconsizes{$1},' align=bottom alt="',$1,
'" SRC="',$ICONSERVER,"/$icon",'" BORDER=0>') '" src="',$ICONSERVER,"/$icon",'" border=0>')
} : } :
$icon); $icon);
} }
@ -98,22 +98,22 @@ sub process_command {
sub top_navigation_panel { sub top_navigation_panel {
# Now add a few buttons with a space between them # Now add a few buttons with a space between them
"<DIV CLASS=navigation>\n" . "<div class=navigation>\n" .
"$NEXT $UP $PREVIOUS $CONTENTS $INDEX $CUSTOM_BUTTONS" . "$NEXT $UP $PREVIOUS $CONTENTS $INDEX $CUSTOM_BUTTONS" .
"<BR>\n" . # Line break "<BR>\n" . # Line break
# If ``next'' section exists, add its title to the navigation panel # If ``next'' section exists, add its title to the navigation panel
($NEXT_TITLE ? "<B> Next:</B> $NEXT_TITLE\n" : undef) . ($NEXT_TITLE ? "<b> Next:</b> $NEXT_TITLE\n" : undef) .
# Similarly with the ``up'' title ... # Similarly with the ``up'' title ...
($UP_TITLE ? "<B>Up:</B> $UP_TITLE\n" : undef) . ($UP_TITLE ? "<b>Up:</b> $UP_TITLE\n" : undef) .
# ... and the ``previous'' title # ... and the ``previous'' title
($PREVIOUS_TITLE ? "<B> Previous:</B> $PREVIOUS_TITLE\n" : undef) . ($PREVIOUS_TITLE ? "<b> Previous:</b> $PREVIOUS_TITLE\n" : undef) .
# Line Break, horizontal rule (3-d dividing line) and new paragraph # Line Break, horizontal rule (3-d dividing line) and new paragraph
"<BR><HR><P></DIV>\n" "<br><hr><p></div>\n"
} }
sub bot_navigation_panel { sub bot_navigation_panel {