X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fheader-popup.html;h=307252afb9354916a413367921f3bf72ec0e2e61;hb=676a117afd9d1091dcf425cc894593beda54e78c;hp=43d9bc3afaa5f1b288898ed32bf85c3a82d896eb;hpb=3ce7691203a7737406bf2d4442f7fd84b81f847e;p=freeside.git diff --git a/httemplate/elements/header-popup.html b/httemplate/elements/header-popup.html index 43d9bc3af..307252afb 100644 --- a/httemplate/elements/header-popup.html +++ b/httemplate/elements/header-popup.html @@ -1,23 +1,66 @@ -% -% my($title, $menubar) = ( shift, shift ); #$menubar is unused here though -% my $etc = @_ ? shift : ''; #$etc is for things like onLoad= etc. -% my $head = @_ ? shift : ''; #$head is for things that go in the section -% my $conf = new FS::Conf; -% +<%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 ) = ( '', '', '', '' ); +#my( $nobr, $nocss ) = ( 0, 0 ); +my $nobr = 0; +if ( ref($_[0]) ) { + my $opt = shift; + $title = $opt->{title}; + $menubar = $opt->{menubar}; + $etc = $opt->{etc}; + $head = $opt->{head}; + $nobr = $opt->{nobr}; +# $nocss = $opt->{nocss}; +} else { + ($title, $menubar) = ( shift, shift ); + $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; + +