Use fritz volumes instead of deleuze volumes for disk space stats

[hcoop/portal.git] / app / header.mlt
diff --git a/app/header.mlt b/app/header.mlt

index de7c81a..b95bc8b 100644 (file)
--- a/app/header.mlt
+++ b/app/header.mlt
@@ -1,9 +1,17 @@
-<html><head>
  <% val title =
         case $"title" of
-                 "" => "Hcoop"
-               | t => ("Hcoop: " ^ t) %>
+                 "" => "HCoop"
+               | t => ("HCoop: " ^ t) %>
+<html><head>
+<link rel="stylesheet" type="text/css" href="/hcoop.css" />
  <title><% Web.html title %></title>
  </head><body>
  
-<h2><b><% Web.html title %></b></h2>
+<div class="main">
+
+<div class="title">
+<img class="globe" src="/globe.gif" />
+<h1><% Web.html title %></h1>
+</div>
+
+<div class="break"></div>