Improve long table display
[hcoop/portal.git] / app / header.mlt
... / ...
CommitLineData
1<% val title =
2 case $"title" of
3 "" => "HCoop"
4 | t => ("HCoop: " ^ t) %>
5<html><head>
6<link rel="stylesheet" type="text/css" href="/hcoop.css" />
7<title><% Web.html title %></title>
8</head><body>
9
10<div class="main">
11
12<div class="title">
13<img class="globe" src="/globe.gif" />
14<h1><% Web.html title %></h1>
15</div>
16
17<div class="break"></div>