% % my($title, $menubar) = ( shift, shift ); % 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; % %![]() |
<% $conf->config('company_name') || 'ExampleCo' %> | Logged in as <% getotaker %> Preferences |
|
|
![]() |
||||
% if ( $FS::CurrentUser::CurrentUser->access_right('View invoices') ) { % } |
![]() |
![]() |
|
![]() |
![]() |
<% $title %>
<% $menubar !~ /^\s*$/ ? "$menubar " : '' %> |