From 3ef62a0570055da710328937e7f65dbb2c027c62 Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 12 Aug 2002 06:17:09 +0000 Subject: import rt 2.0.14 --- rt/webrt/Elements/SelectMatch | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 rt/webrt/Elements/SelectMatch (limited to 'rt/webrt/Elements/SelectMatch') diff --git a/rt/webrt/Elements/SelectMatch b/rt/webrt/Elements/SelectMatch new file mode 100644 index 000000000..7f3a94fae --- /dev/null +++ b/rt/webrt/Elements/SelectMatch @@ -0,0 +1,31 @@ +%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectMatch,v 1.1 2002-08-12 06:17:08 ivan Exp $ + + +<%ARGS> +$Name => undef +$Like => 'contains' +$NotLike => "doesn't contain" +$True => 'is' +$False => "isn't" +$Default => undef + +<%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"; +} + -- cgit v1.2.1