% % 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 " : '' %> |