--- /dev/null
+%# $Id: bannerrow.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+<%args>
+$title
+</%args>
+% my $agent = $m->notes("agent");
+ <tr class="banner">
+ <td align="left">
+ </td>
+ <td align="center">
+ <h1><a style="text-decoration: none" href="/"><% $title %></a></h1>
+ </td>
+ </td>
+ </tr>
--- /dev/null
+%# $Id: head.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+<%args>
+$title
+</%args>
+% my $agent = $m->notes("agent");
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<!DOCTYPE html
+ PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
+ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
+ <head>
+ <title>IRSpy: <% $title %></title>
+ <style type="text/css">
+ <& style.mc &>
+ </style>
+ </head>
+ <body>
--- /dev/null
+%# $Id: layout.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+<%args>
+$debug => undef
+$title
+$component
+</%args>
+<%once>
+use lib "/usr/local/src/cvs/irspy/lib";
+use ZOOM::IRSpy;
+</%once>
+<%perl>
+my $text = $m->scomp($component, %ARGS);
+</%perl>
+<& /chrome/head.mc, title => $title &>
+ <table border="0" cellpadding="0" cellspacing="0" width="100%">
+ <& /chrome/bannerrow.mc, title => $title &>
+ </table>
+ <table border="0" cellpadding="0" cellspacing="0" width="100%">
+ <& /chrome/lmenu.mc &>
+ </table>
+ <p></p>
+ <table border="0" cellpadding="0" cellspacing="0" width="100%">
+ <tr>
+ <td valign="top" class="panel1">
+ <& /chrome/menu.mc &>
+ </td>
+ <td class="spacer"></td>
+ <td valign="top">
+ <% $text %>
+ </td>
+ <td class="spacer">
+ </td>
+ <td valign="top" class="panel2">
+ <& /chrome/pmenu.mc &>
+ </td>
+ </tr>
+ </table>
+<& /chrome/tail.mc &>
--- /dev/null
+%# $Id: lmenu.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+ <tr class="panel3">
+ <td align="left">
+ Lmenu left
+ </td>
+ <td>
+ Lmenu middle
+ </td>
+ <td align="right">
+ Lmenu right
+ </td>
+ </tr>
--- /dev/null
+%# $Id: menu.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+ Menu
--- /dev/null
+%# $Id: pmenu.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+ Pmenu
--- /dev/null
+%# $Id: poweredby.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+ <p/>
+ <hr/>
+ <div class="right">
+ <small>
+ Powered by <a style="text-decoration: none"
+ href="http://indexdata.com/"
+ >Index Data</a>
+ </small>
+ </div>
--- /dev/null
+/* $Id: style.mc,v 1.1 2006-09-14 15:17:48 mike Exp $ */
+body {
+ color: darkblue;
+ background: white;
+}
+
+.banner { background: yellow }
+.panel1 { background: lightblue }
+.panel2 { background: lightgreen }
+.panel3 { background: pink }
+
+<%doc>Fixing the layout</%doc>
+.panel1, .panel2 { width: 100px }
+.spacer { width: 1em }
+
+<%doc>Why isn't this the default?</%doc>
+img { border: 0 }
+
+<%doc>These are just so we can set alignment in an XHTMLish way</%doc>
+.left { text-align: left }
+.center { text-align: center }
+.right { text-align: right }
--- /dev/null
+ <& poweredby.mc &>
+ </body>
+</html>
--- /dev/null
+Hello and welcome to IRSpy