summaryrefslogtreecommitdiff
path: root/httemplate/elements/menubar.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/elements/menubar.html')
-rw-r--r--httemplate/elements/menubar.html59
1 files changed, 0 insertions, 59 deletions
diff --git a/httemplate/elements/menubar.html b/httemplate/elements/menubar.html
deleted file mode 100644
index c14904337..000000000
--- a/httemplate/elements/menubar.html
+++ /dev/null
@@ -1,59 +0,0 @@
-<%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'} ) {
-
- <DIV CLASS="fstabs">
- <% join('', @html ) %>
- </DIV>
-
-%} else {
-
- <% join(' | ', @html) %>
-
-%}
-<%init>
-
-my $opt = ref($_[0]) ? shift : {};
-
-my $url_base = $opt->{'url_base'};
-
-my @html;
-while (@_) {
-
- my ($item, $url) = splice(@_,0,2);
- next if $item =~ /^\s*Main\s+Menu\s*$/i;
-
- my $style = '';
- if ( $opt->{'newstyle'} ) {
-
- my $dclass = $item eq $opt->{'selected'}
- ? 'fstabselected'
- : 'fstab';
-
- $style = qq( CLASS="$dclass" );
-
- }
-
- push @html, qq!<A HREF="$url_base$url" $style>$item</A>!;
-
-}
-
-</%init>