summaryrefslogtreecommitdiff
path: root/rt/webrt/Elements/monthMenu
diff options
context:
space:
mode:
authorcvs2git <cvs2git>2002-08-12 06:17:10 +0000
committercvs2git <cvs2git>2002-08-12 06:17:10 +0000
commit160be29a0dc62e79a4fb95d2ab8c0c7e5996760e (patch)
tree94ebadb17321b138fd7bfd9a5c379eec97c5d328 /rt/webrt/Elements/monthMenu
parent3ef62a0570055da710328937e7f65dbb2c027c62 (diff)
This commit was manufactured by cvs2svn to create branch 'BESTPRACTICAL'.
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>