blob: 7f3a94fae86fc5bc45e7d3c2e7d5300b0277095e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectMatch,v 1.1 2002-08-12 06:17:08 ivan Exp $
<SELECT NAME ="<%$Name%>">
<OPTION VALUE="LIKE" <%$LikeDefault%>><%$Like%></OPTION>
<OPTION VALUE="NOT LIKE" <%$NotLikeDefault%>><%$NotLike%></OPTION>
<OPTION VALUE="=" <%$TrueDefault%>><%$True%></OPTION>
<OPTION VALUE="!=" <%$FalseDefault%>><%$False%></OPTION>
</SELECT>
<%ARGS>
$Name => undef
$Like => 'contains'
$NotLike => "doesn't contain"
$True => 'is'
$False => "isn't"
$Default => undef
</%ARGS>
<%INIT>
my ($TrueDefault, $FalseDefault, $LikeDefault, $NotLikeDefault);
if ($Default && $Default !~ /true/i) {
$FalseDefault = "SELECTED";
}
elsif ($Default && $Default !~ /false/i) {
$TrueDefault = "SELECTED";
}
elsif ($Default && $Default !~ /notlike/i) {
$NotLikeDefault = "SELECTED";
}
else {
$LikeDefault = "SELECTED";
}
</%INIT>
|
