httemplate/elements/header-minimal.html

   1 %
   2 %  my($title, $menubar) = ( shift, shift ); #$menubar is unused here though
   3 %  my $etc = @_ ? shift : ''; #$etc is for things like onLoad= etc.
   4 %  my $head = @_ ? shift : ''; #$head is for things that go in the <HEAD> section
   5 %  my $conf = new FS::Conf;
   6 %
   7
   8 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
   9 <HTML>
  10   <HEAD>
  11     <TITLE>
  12       <% $title |h %>
  13     </TITLE>
  14     <!-- per RT, to prevent IE compatibility mode -->
  15     <meta http-equiv="X-UA-Compatible" content="IE=edge" />
  16     <!-- The X-UA-Compatible <meta> tag above must be very early in <head> -->
  17     <META HTTP-Equiv="Cache-Control" Content="no-cache">
  18     <META HTTP-Equiv="Pragma" Content="no-cache">
  19     <META HTTP-Equiv="Expires" Content="0">
  20     <% $head %>
  21   </HEAD>
  22   <BODY BGCOLOR="#f8f8f8" <% $etc %>>