X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fheader-popup.html;h=01a7ba87fceb8b6f5416d1dbccd16aa12ec72a00;hb=881215feafc01aeee19864c39f0d98d3d6909e65;hp=d74581b07880a98ba08a4272cd8db0eef8200472;hpb=63a268637b2d51a8766412617724b9436439deb6;p=freeside.git
diff --git a/httemplate/elements/header-popup.html b/httemplate/elements/header-popup.html
index d74581b07..01a7ba87f 100644
--- a/httemplate/elements/header-popup.html
+++ b/httemplate/elements/header-popup.html
@@ -1,24 +1,45 @@
+<%doc>
+
+Example:
+
+ <& /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);
+
+
- <% $title %>
+ <% $title |h %>
+
+
+
<% $head %>
- >
+ >
+% if ( $title ) {
- <% $title %>
+ <% $title |h %>
-
+% }
% unless ( $nobr ) {
% }
-
<%init>
my( $title, $menubar, $etc, $head ) = ( '', '', '', '' );
@@ -37,6 +58,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;