X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fmenubar.html;h=e6b7fb1dae1f329b2b81be4433b950180f855d5e;hb=db73422eae5dfcd2d96380ce31941e94c9d9b1ae;hp=87a50312c2c2210ce0ce7fffc56e8ccfbc1907cd;hpb=673b9a458d9138523026963df6fa3b4683e09bae;p=freeside.git diff --git a/httemplate/elements/menubar.html b/httemplate/elements/menubar.html index 87a50312c..e6b7fb1da 100644 --- a/httemplate/elements/menubar.html +++ b/httemplate/elements/menubar.html @@ -1,8 +1,108 @@ -<% - my($item, $url, @html); - while (@_) { - ($item, $url) = splice(@_,0,2); - push @html, qq!$item!; +<%doc> + +Example: + + include( '/elements/menubar.html', + + #options hashref (optional) + { 'newstyle' => 1, #may become the default at some point + 'url_base' => '', #prepended to menubar URLs, for convenience + 'selected' => '', #currently selected label + }, + + #menubar entries (required) + 'label' => $url, + 'label2' => $url2, + #etc. + + ); + +%doc> +%if ( $opt->{'newstyle'} ) { + +% #false laziness w/header.html... shouldn't these just go in freeside.css? + + + +
![]() |
+ + <% join(' ', @html ) %> + | +![]() |
+
+