<%doc> Example: include( '/elements/header.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); %# %# above is what RT declares, should we switch now? hopefully no glitches result %# or just fuck it, XHTML died anyway, HTML 5 or bust? <% include('menu.html', 'freeside_baseurl' => $fsurl, 'position' => $menu_position, 'nocss' => $nocss, ) |n %> <% include('init_overlib.html') |n %> <% include('rs_init_object.html') |n %> <% include('logout.html') |n %> <% $head |n %> STYLE="margin-top:0; margin-bottom:0; margin-left:0px; margin-right:0px">

<% $company_name || 'ExampleCo' %>

Logged in as <% getotaker %>  logout Preferences % if ( $conf->config("ticket_system") % && FS::TicketSystem->access_right(\%session, 'ModifySelf') ) { | Ticketing preferences % }

% if ( $menu_position eq 'top' ) {

<% include('searchbar-prospect.html') |n %>	<% include('searchbar-cust_main.html') |n %>	<% include('searchbar-address2.html') |n %>	<% include('searchbar-cust_bill.html') |n %>	<% include('searchbar-cust_svc.html') |n %>	<% include('searchbar-ticket.html') |n %>

% } else { #$menu_position eq 'left' % } % if ( $menu_position eq 'left' ) { % }

<% include('searchbar-prospect.html') |n %> <% include('searchbar-cust_main.html') |n %> <% include('searchbar-address2.html') |n %> <% include('searchbar-cust_bill.html') |n %> <% include('searchbar-cust_svc.html') |n %> <% include('searchbar-ticket.html') |n %>

<% $title |h %> % unless ( $nobr ) { % } <% $menubar !~ /^\s*$/ ? "$menubar " : '' %> <%init> my( $title, $menubar, $etc, $head ) = ( '', '', '', '' ); my( $nobr, $nocss ) = ( 0, 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 } my $conf = new FS::Conf; my $curuser = $FS::CurrentUser::CurrentUser; my $menu_position = $curuser->option('menu_position') || 'top'; #new default for 1.9 my $company_name; my @agentnums = $curuser->agentnums; if ( scalar(@agentnums) == 1 ) { $company_name = $conf->config('company_name', $agentnums[0] ); } else { $company_name = $conf->config('company_name'); }