summaryrefslogtreecommitdiff
path: root/httemplate/elements/tr-freq.html
diff options
context:
space:
mode:
authorcvs2git <cvs2git>2008-03-16 19:58:34 +0000
committercvs2git <cvs2git>2008-03-16 19:58:34 +0000
commiteb061f5119325e666f0dff40d4089e5c1df58e17 (patch)
treed55e8fef5aca62eb13bbc8ad20dbdf941c3bd266 /httemplate/elements/tr-freq.html
parent3a17b276638200475d54201fa62566b7440e819a (diff)
This commit was manufactured by cvs2svn to create tag 'TRIXBOX_2_6'.TRIXBOX_2_6
Diffstat (limited to 'httemplate/elements/tr-freq.html')
-rw-r--r--httemplate/elements/tr-freq.html54
1 files changed, 0 insertions, 54 deletions
diff --git a/httemplate/elements/tr-freq.html b/httemplate/elements/tr-freq.html
deleted file mode 100644
index cb58bf6b5..000000000
--- a/httemplate/elements/tr-freq.html
+++ /dev/null
@@ -1,54 +0,0 @@
-<% include('tr-td-label.html', @_) %>
-
- <TD <% $style %>>
-
- <INPUT TYPE = "text"
- SIZE = "<% $opt{'size'} || 4 %>"
- NAME = "<% $opt{'field'} || 'freq' %>"
- ID = "<% $opt{'id'} %>"
- VALUE = "<% $curr_value %>"
- >
-
- <SELECT NAME = "<% $opt{'field'} || 'freq' %>_units">
-% foreach my $freq ( keys %freq ) {
- <OPTION VALUE="<% $freq %>"
- <% $freq eq $units ? 'SELECTED' : '' %>
- ><% $freq{$freq} %>
-% }
- </SELECT>
-
- </TD>
-
-</TR>
-
-<%once>
-
- tie my %freq, 'Tie::IxHash',
- #'y' => 'years',
- 'm' => 'months',
- 'w' => 'weeks',
- 'd' => 'days',
- 'h' => 'hours',
- ;
-
-</%once>
-<%init>
-
-my %opt = @_;
-
-my $onchange = $opt{'onchange'}
- ? 'onChange="'. $opt{'onchange'}. '(this)"'
- : '';
-
-my $style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : '';
-
-my $curr_value = $opt{'curr_value'} || $opt{'value'};
-my $units = 'm';
-
-if ( $curr_value =~ /^(\d*)([mwdh])$/i ) {
- $curr_value = $1;
- $units = lc($2);
-}
-
-</%init>
-