sub html_footer {
# --------------------------------------------------------
# Print the menu.
#
# We only print options that the user have permissions for.
#

print qq!<P align=center><$font>!;
print qq!| <A HREF="$db_script_link_url">Home</A> !;
print qq!| <A HREF="$db_script_link_url&add_form=1">Add</A> ! if ($per_add);
if (!$per_admin && $auth_view_own) {
print qq!| <A HREF="$db_script_link_url&view_records=1&db_key=*">View</A> ! if ($per_view);
}
else {
print qq!| <A HREF="$db_script_link_url&view_search=1">View</A> ! if ($per_view);
print qq!| <A HREF="$db_script_link_url&view_records=1&$db_key=*">List All</A> ! if ($per_view);
}
if (!$per_admin && $auth_modify_own) {
print qq!| <A HREF="$db_script_link_url&delete_form=1&db_key=*">Delete</A> ! if ($per_del);
print qq!| <A HREF="$db_script_link_url&modify_form=1&$db_key=*">Modify</A> ! if ($per_mod);
}
else {
print qq!| <A HREF="$db_script_link_url&delete_search=1">Delete</A> ! if ($per_del);
print qq!| <A HREF="$db_script_link_url&modify_search=1">Modify</A> ! if ($per_mod);
}
print qq!| <A HREF="$db_script_link_url&admin_display=1">Admin</A> ! if ($per_admin);
print qq!| <A HREF="$db_script_link_url&change_email_form=1">Change Email Address</A> !
unless ($db_userid eq "default");
print qq!| <A HREF="$db_script_link_url&change_password_form=1">Change Password</A> !
unless ($db_userid eq "default");


print qq!| <A HREF="$db_script_link_url&logoff=1">Log Off</A> !;
print qq!|</font></p>!;

# Print the Footer.
print qq!
<table border=0 width=100%>
<tr><td align=left><$font>Copyright 1998
<A HREF="http://www.gossamer-threads.com">Gossamer Threads Inc.</A></font></td>
<td align=right><a href="http://www.gossamer-threads.com/scripts/dbman/">
<img src="http://www.gossamer-threads.com/images/powered.gif" border=0 width=100
height=31 alt="Database Powered by Gossamer Threads Inc."></a></td></tr>
</table>
!;
}