summaryrefslogtreecommitdiff
path: root/rt/webrt/Elements/monthMenu
diff options
context:
space:
mode:
Diffstat (limited to 'rt/webrt/Elements/monthMenu')
-rwxr-xr-xrt/webrt/Elements/monthMenu37
1 files changed, 0 insertions, 37 deletions
diff --git a/rt/webrt/Elements/monthMenu b/rt/webrt/Elements/monthMenu
deleted file mode 100755
index b9a71d3f9..000000000
--- a/rt/webrt/Elements/monthMenu
+++ /dev/null
@@ -1,37 +0,0 @@
-<%doc>-------------------------------------------------------------------
-monthMenu: Display a pulldown menu of months
-
-Optional arguments:
-$menu_name - Name of menu, defaults to 'month'
-$current - Selected month value (1 to 12)
-$format - Choice of month labels:
- 'full' (January, February, ...)
- 'short' (Jan, Feb, ...)
- 'numeric' (1, 2, ...)
- Defaults to 'full'. The format only affects appearance; the menu
- values are always numeric.
--------------------------------------------------------------------</%doc>
-
-<select name="<% $menu_name %>">
-<option value="-1">-
-% foreach my $month (1..12) {
-<option value="<% $month %>" <% $month==$current ? "selected" : "" %>>
-% if ($format eq 'full') {
-<% $month_names[$month-1] %>
-% } elsif ($format eq 'short') {
-<% substr($month_names[$month-1],0,3) %>
-% } elsif ($format eq 'numeric') {
-<% sprintf("%02d",$month) %>
-% }
-% }
-</select>
-
-<%init>
-my @month_names = qw(January February March April May June July August September October November December);
-</%init>
-
-<%args>
-$menu_name=>'month'
-$current=>undef
-$format=>'full'
-</%args>