<%doc> Example: <& /elements/header-logo.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 'no_jquery' => #for use from RT, which loads its own } &> %# %# above is what RT declares, should we switch now? hopefully no glitches result %# or just fuck it, XHTML died anyway, HTML 5 or bust? <% encode_entities($title) || $title_noescape |n %> % if ( $mobile ) { % } % unless ( $nocss ) { % } % unless ( $no_jquery ) { % if ( $FS::CurrentUser::CurrentUser->option('printtofit') ) { % } % } <% include('init_overlib.html') |n %> <% include('rs_init_object.html') |n %> <% $head |n %> %# announce our base path, and the Mason comp path of this page STYLE="margin-top:0; margin-bottom:0; margin-left:0px; margin-right:0px">
<% $company_url ? qq() : '' |n %>freeside<% $company_url ? '' : '' |n %> <% $company_name || 'ExampleCo' %>
<%init> my( $title, $title_noescape, $menubar, $etc, $head ) = ( '', '', '', '', '' ); my( $nobr, $nocss, $no_jquery ) = ( 0, 0, 0 ); my $mobile; my $opt = shift; $title = $opt->{title}; $title_noescape = $opt->{title_noescape}; $menubar = $opt->{menubar}; $etc = $opt->{etc}; $head = $opt->{head}; $nobr = $opt->{nobr}; $nocss = $opt->{nocss}; $mobile = $opt->{mobile}; $no_jquery = $opt->{no_jquery}; my $conf = new FS::Conf; my $curuser = $FS::CurrentUser::CurrentUser; my $menu_position = $curuser->option('menu_position') || 'top'; #new default for 1.9 if ( !defined($mobile) ) { $mobile = $curuser->option('mobile_menu',1) && FS::UI::Web::is_mobile(); } if ( $cgi->param('mobile') =~ /^(\d)$/ ) { # allow client to override $mobile = $1; } my($company_name, $company_url); my @agentnums = $curuser->agentnums; if ( scalar(@agentnums) == 1 ) { $company_name = $conf->config('company_name', $agentnums[0] ); $company_url = $conf->config('company_url', $agentnums[0] ); } else { $company_name = $conf->config('company_name'); $company_url = $conf->config('company_url'); }