X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fheader.html;h=0ff8ecda632ac189021c9911a32098bbcd4486bd;hb=cc8429ee7e4cb465b9f555530793b5bcac994010;hp=10e4e40f1dba7e48a89c75b53810c7ed68a282b7;hpb=2041a9143fac20b79ead4a1ae01224dedf5b27c2;p=freeside.git diff --git a/httemplate/elements/header.html b/httemplate/elements/header.html index 10e4e40f1..0ff8ecda6 100644 --- a/httemplate/elements/header.html +++ b/httemplate/elements/header.html @@ -1,21 +1,246 @@ -<% - 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 -%> - - - - <%= $title %> - - - - - <%= $head %> - - > + + + + + <% $title %> + + + + + + <% include('menu.html', 'freeside_baseurl' => $fsurl, + 'position' => $menu_position, + ) + %> + + + + <% $head %> + + + <% $etc %> STYLE="margin-top:0; margin-bottom:0; margin-left:0; margin-right:0"> + + + + + + + + + +
freeside + <% $conf->config('company_name') || 'ExampleCo' %> + Logged in as <% getotaker %> 
Preferences 
 +
+ + + + +% if ( $conf->config('ticket_system') eq 'RT_Internal' ) { +% eval "use RT;"; + + + +% } + + + +
+ + Freeside v<% $FS::VERSION %>
+ ">Documentation
+ + 		+ + RT v<% $RT::VERSION %>
+ Documentation
+ +
+ +
+ + + + + + + + +% if ( $menu_position eq 'top' ) { + + + + + + + + + + + + + + + +% } + + + + + + + + + + + + + + +
+ +
+
+
+
+ +
+ 		+
+
+ Advanced + +
+ 		+% if ( $FS::CurrentUser::CurrentUser->access_right('View invoices') ) { + +
+ +% if ( $FS::CurrentUser::CurrentUser->access_right('List invoices') ) { + + Advanced +% } + +
+ +
+% } + + 		+
+
+ Advanced + +
+ 		+% if ( $conf->config("ticket_system") ) { +
+
+ Advanced + +
+% } +
+ + + + + +% if ( $menu_position eq 'left' ) { + + + + +% } + + + + + + + +% if ( $menu_position eq 'left' ) { + + + + +% } + +
+ +
+ + + 		+ - <%= $title %> + <% $title %> +

- <%= $menubar ? "$menubar

" : '' %> + <% $menubar !~ /^\s*$/ ? "$menubar

" : '' %> +<%init> + +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; + +my $menu_position = $FS::CurrentUser::CurrentUser->option('menu_position') + || 'left'; + +