The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<%args>
$title => undef
$show_home_button => 1
</%args>
<%init>
$r->headers_out->{'Pragma'} = 'no-cache';
$r->headers_out->{'Cache-control'} = 'no-cache';
</%init>
<html>
<head>
<link rel="stylesheet" type="text/css" href="<%RT->Config->Get('WebPath')%>/m/style.css"/>
<title><%$title%></title>
<meta name="viewport" content="width=device-width height=device-height user-scalable=yes"/>
<script type="text/javascript" src="<%RT->Config->Get('WebPath')%>/NoAuth/js/ahah.js"></script>
</head>
<body>
% if ($show_home_button) {
% # The align is for older browsers, like the blackberry
<div id="gohome" align="right">
<a href="<%RT->Config->Get('WebPath')%>/m/"><&|/l&>Homepage</&></a>
</div>
% }
% if ($title) {
<h1><%$title%></h1>
% }