tag, for things like onLoad=
- 'head' => '', #included before closing tag
- 'nobr' => 0, #1 for no
after the title
- }
- );
+ <& /elements/header-popup.html,
+ {
+ 'title' => 'Title',
+ 'menubar' => \@menubar,
+ 'etc' => '', #included in tag, for things like onLoad=
+ 'head' => '', #included before closing tag
+ 'nobr' => 0, #1 for no
after the title
+ }
+ &>
#old-style
include( '/elements/header.html', 'Title', $menubar, $etc, $head);
@@ -27,16 +27,16 @@ Example:
<% $head %>
- >
+ >
+% if ( $title ) {
<% $title |h %>
-
+% }
% unless ( $nobr ) {
% }
-
<%init>
my( $title, $menubar, $etc, $head ) = ( '', '', '', '' );
@@ -55,6 +55,7 @@ if ( ref($_[0]) ) {
$etc = @_ ? shift : ''; #$etc is for things like onLoad= etc.
$head = @_ ? shift : ''; #$head is for things that go in the section
}
+$etc .= ' BGCOLOR="#f8f8f8"' unless $etc =~ /BGCOLOR/i;
my $conf = new FS::Conf;