;;; header.mhtml: -*- Meta-HTML -*-  Header used in server administration.
;;;
;;;  Copyright (c) 1996 Brian J. Fox
;;;  Author: Brian J. Fox (bfox@ai.mit.edu) Mon Jun 24 14:07:18 1996.
<include /includes/server-info.mhtml>
<include /macros/general.mhtml>
<defvar layout::layout bordered-left>
<defvar layout::left-border-width 130>
<include /macros/border.mhtml>
<include /macros/message.mhtml>
<include /macros/menus.mhtml>

<html>
<head> <title> <get-var title> </title> </head>

<body text="#000000" link="#0000EE" vlink="#551A8B" alink="FF0000"
      bgcolor="#FFFFFF" background="/images/background.gif">

<when <not <get-var site::inhibit-navigation>>>
  <include navbar.mhtml>
</when>

<layout::page>
  <table width=100%>
    <tr valign=middle>
      <td align=left>
	<concat <a href="<get-var mhtml::http-prefix>/">
		<img src="/images/server.gif" border=0 align=left>
		</a>>
      </td>
      <td align=right>
	<center>
	  <hr width=70% size=4>
	  <h1><i>Server Administration</i></h1>
	  <h2><b>
	  Server:
	  <a href="http://<get-var admin::server-name>:<get-var admin::server-port>">
	    <get-var admin::server-name>:<get-var admin::server-port>
	  </a>
	  </b></h2>
	  <hr width=70% size=4>
	</center>
      </td>
    </tr>
  </table>
  <br clear>
  <show-message>
</layout::page>

<layout::default-header>

