cvsuser 05/11/14 12:05:21
Modified: App-Widget-JSApp/lib/App/Widget/JSApp DualSelectWidget.pm
Log:
add support for maxselected and alternative js-app classes
Revision Changes Path
1.2 +9 -6
p5ee/App-Widget-JSApp/lib/App/Widget/JSApp/DualSelectWidget.pm
Index: DualSelectWidget.pm
===================================================================
RCS file:
/cvs/public/p5ee/App-Widget-JSApp/lib/App/Widget/JSApp/DualSelectWidget.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- DualSelectWidget.pm 9 Aug 2005 19:46:51 -0000 1.1
+++ DualSelectWidget.pm 14 Nov 2005 20:05:21 -0000 1.2
@@ -30,8 +30,9 @@
$self->init_jsapp();
- my $size = "";
- $size = ",\n \"size\" : $self->{size}" if ($self->{size});
+ my $extra_attribs = "";
+ $extra_attribs .= ",\n \"size\" : $self->{size}" if ($self->{size});
+ $extra_attribs .= ",\n \"maxselected\" : $self->{maxselected}" if
($self->{maxselected});
my ($values, $labels) = $self->values_labels();
my ($values_text, $i);
@@ -65,12 +66,14 @@
my $value = $context->so_get($name);
$value = "" if (!defined $value);
+ my $class = $self->{jsapp_serviceClass} || 'DualSelectWidget';
+
my $html = <<EOF;
<script type="text/javascript">
context.widget("$name", {
- "serviceClass" : "DualSelectWidget",
+ "serviceClass" : "$class",
"submittable" : 1,
- "default" : "$value"$size$values_text$labels_text
+ "default" : "$value"$extra_attribs$values_text$labels_text
}).write();
</script>
EOF